Metrics for a from scale-rotated-ellipse

start0.0ms (0%)

Memory: 0.4MiB live, 0.4MiB allocated; 0ms collecting garbage

analyze1.6s (4.4%)

Memory

-6.6MiB live, 1 837.6MiB allocated; 393ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
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.5s (12.6%)

Memory

51.5MiB live, 5 506.9MiB allocated; 1.8s collecting garbage

Samples

3.7s

8 256×

valid

Precisions

Click to see histograms. Total time spent on operations: 3.3s

ival-div!: 881.0ms (26.6% of total)

ival-pow2: 870.0ms (26.3% of total)

ival-mult!: 714.0ms (21.6% of total)

ival-sinu: 224.0ms (6.8% of total)

ival-cosu: 187.0ms (5.7% of total)

ival-neg: 187.0ms (5.7% of total)

ival-sqrt: 108.0ms (3.3% of total)

ival-add!: 101.0ms (3.1% of total)

ival-sub!: 34.0ms (1% of total)

adjust: 2.0ms (0.1% of total)

Bogosity

preprocess50.0ms (0.1%)

Memory

-11.2MiB live, 34.2MiB allocated; 13ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	556	3888
1	2082	3745

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	3.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))))

Status

Accuracy

Program

▶

3.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))))

Symmetry

(abs a)

(abs b)

(abs x-scale)

(abs y-scale)

Compiler

Compiled 284 to 112 computations (60.6% saved)

series791.0ms (2.2%)

Memory

3.9MiB live, 834.3MiB allocated; 147ms collecting garbage

Counts

56 → 528

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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (/ (* (pow a 2) (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 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))))))) (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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)))))))))))))))
#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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 2) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow angle 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/8 (/ (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (* -1 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* -4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (/ (/ (+ (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 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) #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 (+ (* -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 (* -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 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 (+ (* -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 (* -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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 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))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (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 (- (/ (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 (+ (* 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 (* 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (* (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))))))) #s(hole binary64 (* -1 (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (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 (* 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (cos (* 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) (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (+ (* -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 (/ (+ (* -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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (* (pow y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (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 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (sin (* 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) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (+ (* -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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ (* -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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))))) y-scale))))

Calls

15 calls:

Time	Variable		Point	Expression
66.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))
63.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))
62.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))
60.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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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	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))

rewrite856.0ms (2.4%)

Memory

24.5MiB live, 814.9MiB allocated; 118ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3325	265002
0	3428	241482
0	11375	237061

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

584 → 638

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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (/ (* (pow a 2) (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 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))))))) (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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)))))))))))))))
#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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 2) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow angle 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/8 (/ (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (* -1 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* -4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (/ (/ (+ (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 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) #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 (+ (* -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 (* -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 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 (+ (* -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 (* -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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 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))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (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 (- (/ (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 (+ (* 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 (* 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (* (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))))))) #s(hole binary64 (* -1 (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (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 (* 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (cos (* 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) (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (+ (* -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 (/ (+ (* -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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (* (pow y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (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 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (sin (* 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) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (+ (* -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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ (* -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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))))) y-scale))))

Outputs
(/.f64 (neg.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.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)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))))))) (neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.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)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.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)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))))))
(.f64 (sqrt.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))))
(pow.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.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)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.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 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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.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)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))))
(.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.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)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
#s(literal 2 binary64)
(/.f64 (neg.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a))))) (neg.f64 (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.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 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 3 binary64)) (pow.f64 (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.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 3 binary64))) (fma.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))))))
(+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
(/.f64 (+.f64 (pow.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #s(literal 3 binary64)) (pow.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) #s(literal 3 binary64))) (fma.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (-.f64 (.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (fma.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) y-scale (.f64 x-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 x-scale y-scale))
(+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)) (neg.f64 x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 x-scale))
(/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
(+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) x-scale) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) x-scale))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #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)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #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)))) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(.f64 (.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 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))
(.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))))
(pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.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))))
(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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (neg.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 y-scale))
(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) y-scale))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))))))
(fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(fma.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (.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 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(.f64 (.f64 a a) (pow.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))
(.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))))
(pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.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))))
(.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 (+.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 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(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 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.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))))
(hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(/.f64 (+.f64 (pow.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)) #s(literal 3 binary64)) (pow.f64 (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)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.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 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (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)))) (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 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.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 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.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))))))
(fma.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.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 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.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 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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))
(exp.f64 (.f64 (log.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (pow.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #s(literal 3 binary64)) (pow.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) #s(literal 3 binary64))) (fma.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (fma.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) y-scale) (.f64 x-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 x-scale y-scale))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) 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)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) 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)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) 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)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) 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)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) 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)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) 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)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))) (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)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) 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)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.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))))
(.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (*.f64 a a)))
(/.f64 (-.f64 (pow.f64 (.f64 b b) #s(literal 3 binary64)) (pow.f64 (.f64 a a) #s(literal 3 binary64))) (fma.f64 (.f64 b b) (.f64 b b) (fma.f64 (.f64 a a) (.f64 a a) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 a a) (.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.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 (.f64 a a) (.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal 8 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal 8 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-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)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (.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))) (.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
#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)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
#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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (fma.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) x-scale))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) y-scale))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 a (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-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) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-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) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
#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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))))
#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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) x-scale)))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) 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)))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (fma.f64 #s(literal -2 binary64) (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) a) (-.f64 (.f64 #s(literal -4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.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)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.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 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 a a) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 a a)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 a a)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 a a)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 a a)) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-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 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))
#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)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-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 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-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 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
#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) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (*.f64 x-scale y-scale)))))))
#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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) x-scale)))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (*.f64 a a) 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (-.f64 (.f64 #s(literal -4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (.f64 (.f64 b b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.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 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) (.f64 b (cos.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))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (.f64 b b) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 b (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-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) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (- (pow b 2) (pow a 2)) (-.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 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) b) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.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 6 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.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 6 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.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 6 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.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 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 b b)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 b b)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b b) (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))
#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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 b b)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (.f64 (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 binary64) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.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 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.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 angle angle) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.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 angle angle) (-.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.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 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.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 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-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 (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-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 -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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.f64 x-scale x-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 (.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 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 x-scale x-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 -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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (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 #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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (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)) (fma.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (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)) (fma.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (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 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (.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) (fma.f64 #s(literal 1/12597120000 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 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (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 (/.f64 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (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) (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 (/.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) (fma.f64 #s(literal 1/12597120000 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 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (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) (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 (.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.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) (fma.f64 #s(literal 1/12597120000 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 (.f64 a a) (.f64 y-scale y-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) (/.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) (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) (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) (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) (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 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) x-scale) (fma.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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) x-scale) (fma.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)) (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) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (fma.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) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (fma.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) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#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) (fma.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) (fma.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 (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 (.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) (*.f64 #s(literal 1/180 binary64) angle))
#s(approx angle angle)
#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)))) (+.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) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (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 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) y-scale) (fma.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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) y-scale) (fma.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)) (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) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.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) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.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) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64)))) (.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)))) (+.f64 a (.f64 #s(literal -1/64800 binary64) (.f64 a (.f64 (.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))))
#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) (fma.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) (fma.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))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 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 (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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (.f64 angle angle) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (.f64 angle angle) (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)))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (.f64 angle angle) (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)))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (pow.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))))) #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (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)))) (pow.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))))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (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 (.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 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (pow.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))))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-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 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 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 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 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
#s(approx (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-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 (.f64 angle angle) (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)))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.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)))) (.f64 (.f64 x-scale x-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 (.f64 angle angle) (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)))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.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) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale 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 (fma.f64 #s(literal 1/90 binary64) (/.f64 (.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/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) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale 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 (fma.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 (fma.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 angle (fma.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 (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 (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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))))))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))))) (.f64 (.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 (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 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) y-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (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 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
#s(approx (* (* 2 (- (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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 -4 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 4 binary64) (/.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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))))))) (*.f64 x-scale x-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.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 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (* x-scale y-scale) 2) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
#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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))))) (.f64 x-scale x-scale)))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))))))) (.f64 x-scale x-scale)))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (pow.f64 (.f64 x-scale (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (pow.f64 (.f64 x-scale (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.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 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.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 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.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 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.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 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-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 #s(literal -4 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-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 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-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 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-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)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (*.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)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (*.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)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.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))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 x-scale x-scale)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-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 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.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 binary64) (.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.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 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.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 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.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 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-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 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-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 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-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 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 y-scale y-scale) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))) (.f64 y-scale y-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 -4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 y-scale y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)))
#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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))
#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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))))) (*.f64 y-scale y-scale)))
#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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))))))) (*.f64 y-scale y-scale)))
#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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))))))) (*.f64 y-scale y-scale)))
#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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.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)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.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 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx 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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))) (.f64 y-scale y-scale)))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))))) (.f64 y-scale y-scale)))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))))) (*.f64 y-scale y-scale)))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (pow.f64 (.f64 y-scale (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (pow.f64 (.f64 y-scale (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 y-scale y-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.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 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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))))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (*.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 #s(literal -4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.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 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (*.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 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (*.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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (*.f64 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 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (*.f64 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 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 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 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.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))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.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 binary64) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (*.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 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.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 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (*.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (*.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (*.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))))))))) y-scale)))

eval196.0ms (0.5%)

Memory: 17.6MiB live, 144.7MiB allocated; 66ms collecting garbage
Compiler: Compiled 154 251 to 7 075 computations (95.4% saved)

prune125.0ms (0.4%)

Memory

-8.5MiB live, 132.5MiB allocated; 9ms collecting garbage

Pruning

30 alts after pruning (30 fresh and 0 done)

	Pruned	Kept	Total
New	564	30	594
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	565	30	595

Accuracy

12.1%

Counts

595 → 30

Alt Table

Click to see full alt table

Status	Accuracy	Program
	3.8%	(/.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-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))))
	5.9%	(/.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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-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))))
▶	6.7%	(/.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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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))))
	3.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)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.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))))
	5.4%	(/.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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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.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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 y-scale y-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.2%	(/.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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-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))))
	6.6%	(/.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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.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))))
	0.5%	(/.f64 (neg.f64 (sqrt.f64 #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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
	0.8%	(/.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) y-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))))
	1.4%	(/.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-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))))
▶	0.7%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))))
	1.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
	0.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 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)))))))))
	1.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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b)))))
	1.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b))))
	1.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a))))
▶	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b)))))
▶	1.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
	1.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 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 a a))))
	0.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
	0.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 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 a a))))
▶	0.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
	0.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 binary64) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
	0.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 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))

Compiler

Compiled 11 604 to 5 516 computations (52.5% saved)

series1.9s (5.2%)

Memory

89.4MiB live, 1 644.3MiB allocated; 301ms collecting garbage

Counts

140 → 1 722

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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 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))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.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 b b)
(*.f64 x-scale x-scale)
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(*.f64 a a)
(*.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
(.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b))))
#s(literal 1/4 binary64)
(/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (*.f64 b b)))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
#s(literal 8 binary64)
(/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(pow.f64 a #s(literal 4 binary64))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(pow.f64 b #s(literal 4 binary64))
(+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
(.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b))))
(/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b)))
(.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.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)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))
(/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 a (cos.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/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
(pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 b (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b)))
#s(literal -1/4 binary64)
(/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))
(.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
(fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
(/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
(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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
(.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
(/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))
(pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))
(+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (/ (* (pow a 2) (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 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))))))) (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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)))))))))))))))
#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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow b 4) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (pow y-scale 4)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 8 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (pow a 4) #s(hole binary64 (pow a 4)))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ 1 (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (sqrt (/ (pow b 4) (pow x-scale 4)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (* (* a a) (* b b)) #s(hole binary64 (* (pow a 2) (pow b 2))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 1/8 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 1/2 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 8 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow a 2) (+ (* 8 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow a 2) (+ (* -4 (/ (* (pow a 2) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow a 4) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow y-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow a 4) (pow x-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (* (pow a 2) (pow x-scale 2))) (/ 1 (pow y-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 6) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 6) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 6) (+ (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 6) (+ (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 6) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 6) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 6) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (/ 1 (pow y-scale 2)) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (/ 1 (pow y-scale 2)) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (/ 1 (pow y-scale 2)) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (sqrt (/ 1 (pow y-scale 4))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (/ 1 (pow y-scale 2)) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 6) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 6) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 6) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 6) (+ (* -1/2 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2)))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 6) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 6) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 6) (+ (* -1/2 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2))))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow a 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 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))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 2) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 4)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 8 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 8 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 4 (/ (* (pow a 6) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (* (pow a 6) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (+ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* 1/2 (/ (* (pow a 6) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (pow b 4) #s(hole binary64 (pow b 4)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (sqrt (/ (pow a 4) (pow y-scale 4)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 1/8 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 1/2 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 8 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow b 2) (+ (* 8 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow b 2) (+ (* -4 (/ (* (pow a 6) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 4) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 6) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (+ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -1/2 (/ (* (pow a 6) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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)))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #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 (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-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 b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow 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 b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 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))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow x-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow b 4) (pow y-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (/ 1 (pow x-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 6) (+ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (pow b 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (pow b 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (pow b 2))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (sqrt (/ 1 (pow x-scale 4))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 6) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 6) (+ (* -1/2 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2)))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 6) (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow b 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow b 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 6) (+ (* -1/2 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow b 2))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow b 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (+ (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 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))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow angle 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/8 (/ (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (* -1 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* -4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (/ (/ (+ (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 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 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) #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 (+ (* -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 (* -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 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 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 (+ (* -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 (* -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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 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))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (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 (- (/ (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 (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow angle 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow angle 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (pow y-scale 2))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (+ (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (pow y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (pow y-scale 2)) (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2)))) (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (+ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (* (pow angle 2) (+ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (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))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (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))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow y-scale 4))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 4))) (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4)))))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 4))) (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (+ (* (pow angle 2) (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4))))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))))))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ 1 (pow y-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* 1/2 (/ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (/ 1 (pow y-scale 4))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ 1 (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow y-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))))))) (/ 1 (pow y-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))))))) (/ 1 (pow y-scale 4)))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (+ (* 1/2267481600000 (pow (PI) 5)) (* (pow angle 2) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))))))))))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow angle 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow y-scale 2))) (/ 1 (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))))) (/ 1 (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* (pow angle 2) (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))))) (/ 1 (pow y-scale 4)))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ -1 (pow y-scale 2))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (- (* (pow angle 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow y-scale 2)))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-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))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow y-scale 2)))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-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)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow y-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (/ 1 (pow y-scale 2))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2))) (/ 1 (pow y-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))))) (/ 1 (pow y-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2)))))))))) (/ 1 (pow y-scale 2)))))
#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 (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (/ 1 (pow y-scale 2)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))))))) (/ 1 (pow y-scale 2)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))))) (/ 1 (pow y-scale 2)))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow a 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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))) (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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))) (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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))))) (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 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 (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (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 b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)))))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 4) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 4) (pow (PI) 2))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* 2 (/ (* (pow angle 2) (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 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 x-scale 2))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* (pow angle 2) (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (* 2 (/ (* (pow b 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 (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 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)))))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* (pow angle 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 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)))))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow x-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow angle 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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow y-scale 2)))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))))))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 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 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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 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/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 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (* (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))))))) #s(hole binary64 (* -1 (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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 a 2) (pow b 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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 a 2) (pow b 2)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (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 a 2) (pow (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (sqrt (/ (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 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))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (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 (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (/ (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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (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 (* 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (cos (* 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) (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (pow y-scale 2))) (pow b 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (/ (* (pow a 4) (pow x-scale 2)) (pow y-scale 4)))) (pow b 4)) (pow x-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (pow b 2)) (pow x-scale 2))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 4 (/ (* (pow a 6) (* (pow b 6) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (pow y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow a 6) (* (pow b 6) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow x-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))))) (pow x-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (sqrt (pow b 4)))) (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* 1/2 (/ (* (pow a 6) (* (pow b 6) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3))))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (/ (pow a 2) (pow y-scale 2))))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))) (/ (pow a 2) (pow y-scale 2))))) (pow b 2))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (sqrt (pow b 4)) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (* (pow y-scale 2) (sqrt (pow b 4)))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4))))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2)) (pow b 2)) (pow x-scale 2))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (/ (* (pow x-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 (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))))) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4)))))) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))) (pow x-scale 4))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (* (pow y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow a 4) (pow y-scale 4)) (/ (pow b 4) (pow x-scale 4))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (pow x-scale 2)))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (pow x-scale 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (* (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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (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 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (sin (* 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) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (pow x-scale 2))) (pow a 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (/ (* (pow b 4) (pow y-scale 2)) (pow x-scale 4)))) (pow a 4)) (pow y-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 4 (/ (* (pow a 6) (* (pow b 6) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (pow x-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 1/2 (/ (* (pow a 6) (* (pow b 6) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow y-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2))))) (pow y-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (sqrt (pow a 4)))) (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (* (pow y-scale 2) (+ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (sqrt (pow a 4)))) (* 1/2 (/ (* (pow a 6) (* (pow b 6) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3))))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (sqrt (pow a 4)))) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (pow a 2)) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (sqrt (pow a 4)) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (* (pow x-scale 2) (sqrt (pow a 4)))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4))))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4))))))))) (pow y-scale 2))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (sqrt (* 8 (* (pow a 4) (* (pow b 4) (+ (sqrt (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 b 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (sqrt (* 8 (* (pow a 4) (* (pow b 4) (+ (sqrt (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 b 2)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* x-scale (sqrt (* 8 (* (pow a 4) (* (pow b 4) (+ (sqrt (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)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (* (pow a 4) (* (pow b 4) (+ (sqrt (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))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (/ (sqrt (* 8 (* (pow a 4) (* (pow b 4) (+ (sqrt (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 4)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 4))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (/ (* (pow y-scale 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 (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4)))))) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4))))) (pow y-scale 4))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (* (pow y-scale 2) (pow (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (pow y-scale 2)))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (pow y-scale 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))

Calls

15 calls:

Time	Variable		Point	Expression
209.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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) (* x-scale x-scale) (/ (* a a) (* y-scale y-scale)) (* a a) (* y-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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) (* (* x-scale x-scale) (* y-scale y-scale)) (* (* a a) (* b b)) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (* a (cos (* 1/180 (* angle (PI))))) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* b (sin (* 1/180 (* angle (PI))))) (sin (* 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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)))))) (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* b (cos (* 1/180 (* angle (PI))))) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))
148.0ms	b	@	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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) (* x-scale x-scale) (/ (* a a) (* y-scale y-scale)) (* a a) (* y-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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) (* (* x-scale x-scale) (* y-scale y-scale)) (* (* a a) (* b b)) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (* a (cos (* 1/180 (* angle (PI))))) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* b (sin (* 1/180 (* angle (PI))))) (sin (* 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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)))))) (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* b (cos (* 1/180 (* angle (PI))))) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))
131.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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) (* x-scale x-scale) (/ (* a a) (* y-scale y-scale)) (* a a) (* y-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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) (* (* x-scale x-scale) (* y-scale y-scale)) (* (* a a) (* b b)) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (* a (cos (* 1/180 (* angle (PI))))) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* b (sin (* 1/180 (* angle (PI))))) (sin (* 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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)))))) (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* b (cos (* 1/180 (* angle (PI))))) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))
98.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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) (* x-scale x-scale) (/ (* a a) (* y-scale y-scale)) (* a a) (* y-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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) (* (* x-scale x-scale) (* y-scale y-scale)) (* (* a a) (* b b)) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (* a (cos (* 1/180 (* angle (PI))))) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* b (sin (* 1/180 (* angle (PI))))) (sin (* 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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)))))) (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* b (cos (* 1/180 (* angle (PI))))) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))
88.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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) (* x-scale x-scale) (/ (* a a) (* y-scale y-scale)) (* a a) (* y-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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) (* (* x-scale x-scale) (* y-scale y-scale)) (* (* a a) (* b b)) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (* a (cos (* 1/180 (* angle (PI))))) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* b (sin (* 1/180 (* angle (PI))))) (sin (* 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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)))))) (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* b (cos (* 1/180 (* angle (PI))))) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))

rewrite3.1s (8.6%)

Memory

62.0MiB live, 3 679.9MiB allocated; 2.1s collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	10029	648896
0	10314	648896
0	10314	640051

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

1 862 → 1 864

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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 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))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.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 b b)
(*.f64 x-scale x-scale)
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(*.f64 a a)
(*.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
(.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b))))
#s(literal 1/4 binary64)
(/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (*.f64 b b)))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
#s(literal 8 binary64)
(/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(pow.f64 a #s(literal 4 binary64))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(pow.f64 b #s(literal 4 binary64))
(+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
(.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b))))
(/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b)))
(.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.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)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))
(/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 a (cos.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/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
(pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 b (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b)))
#s(literal -1/4 binary64)
(/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))
(.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
(fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
(/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
(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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
(.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
(/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))
(pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))
(+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (/ (* (pow a 2) (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 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))))))) (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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)))))))))))))))
#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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow b 4) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (pow y-scale 4)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 8 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (pow a 4) #s(hole binary64 (pow a 4)))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ 1 (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (sqrt (/ (pow b 4) (pow x-scale 4)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (* (* a a) (* b b)) #s(hole binary64 (* (pow a 2) (pow b 2))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 1/8 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 1/2 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow a 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 8 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow a 2) (+ (* 8 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow a 2) (+ (* -4 (/ (* (pow a 2) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow a 4) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow y-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow a 4) (pow x-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (* (pow a 2) (pow x-scale 2))) (/ 1 (pow y-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 6) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 6) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 6) (+ (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 6) (+ (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 6) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 6) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 6) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (/ 1 (pow y-scale 2)) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (/ 1 (pow y-scale 2)) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (/ 1 (pow y-scale 2)) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (sqrt (/ 1 (pow y-scale 4))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (/ 1 (pow y-scale 2)) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 6) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 6) (+ (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 6) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 6) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 6) (+ (* -1/2 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (pow y-scale 2)))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 6) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 6) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 6) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 6) (+ (* -1/2 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow a 2))))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow a 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow a 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow a 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 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))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 2) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (* x-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -4 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 2) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 4)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 8 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 8 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 4 (/ (* (pow a 6) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (* (pow a 6) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (+ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* 1/2 (/ (* (pow a 6) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (pow b 4) #s(hole binary64 (pow b 4)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (sqrt (/ (pow a 4) (pow y-scale 4)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 1/8 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 1/2 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow b 2) (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 8 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow b 2) (+ (* 8 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow b 2) (+ (* -4 (/ (* (pow a 6) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 4) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 6) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* (pow a 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (+ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -1/2 (/ (* (pow a 6) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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)))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (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))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))))) (* (pow y-scale 4) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #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 (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-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 b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow 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 b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 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))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow x-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow b 4) (pow y-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (/ 1 (pow x-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 4) (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 6) (+ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (pow b 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (pow b 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (pow b 2))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (sqrt (/ 1 (pow x-scale 4))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (/ 1 (pow x-scale 2)) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 6) (+ (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 6) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 6) (+ (* -1/2 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (pow y-scale 2)))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 6) (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow b 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 6) (+ (* 1/2 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow b 2)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 6) (+ (* -1/2 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow b 2))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (* (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 (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow b 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow b 6) (* (pow y-scale 4) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow b 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (+ (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 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))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* x-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -4 (/ (* (pow a 6) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 8) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow angle 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/8 (/ (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (* -1 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* -4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (/ (/ (+ (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 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 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) #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 (+ (* -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 (* -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 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 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 (+ (* -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 (* -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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 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))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (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 (- (/ (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 (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow angle 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow angle 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))) (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (+ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* x-scale (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 4 (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1/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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (pow y-scale 2))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (+ (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (pow y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (pow y-scale 2)) (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (pow y-scale 2)))) (/ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (+ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (* (pow angle 2) (+ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 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 y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (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))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* (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))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (/ (* (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) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))) (/ (pow a 2) (pow y-scale 2))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4)))) (/ (* (pow a 2) (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* 1/2 (/ (- (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))) (/ (* (pow a 4) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)) (* (pow y-scale 8) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow y-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow y-scale 4))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 4))) (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4)))))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 4))) (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (+ (* (pow angle 2) (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4))))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))))))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ 1 (pow y-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* 1/2 (/ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (/ 1 (pow y-scale 4))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ 1 (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow y-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))))))) (/ 1 (pow y-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))))))) (/ 1 (pow y-scale 4)))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (+ (* 1/2267481600000 (pow (PI) 5)) (* (pow angle 2) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))))))))))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow angle 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow y-scale 2))) (/ 1 (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))))) (/ 1 (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* (pow angle 2) (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))))) (/ 1 (pow y-scale 4)))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ -1 (pow y-scale 2))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (- (* (pow angle 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow y-scale 2)))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-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))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow y-scale 2)))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-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)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow y-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (/ 1 (pow y-scale 2))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2))) (/ 1 (pow y-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))))) (/ 1 (pow y-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2)))))))))) (/ 1 (pow y-scale 2)))))
#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 (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (/ 1 (pow y-scale 2)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))))))) (/ 1 (pow y-scale 2)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))))) (/ 1 (pow y-scale 2)))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow a 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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))) (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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))) (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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))))) (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 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 (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (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 b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)))))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 4) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 4) (pow (PI) 2))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* 2 (/ (* (pow angle 2) (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 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 x-scale 2))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* (pow angle 2) (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (* 2 (/ (* (pow b 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 (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 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)))))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* (pow angle 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 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)))))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow x-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow angle 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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow y-scale 2)))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))))))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 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 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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 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/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 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (* (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))))))) #s(hole binary64 (* -1 (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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 a 2) (pow b 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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 a 2) (pow b 2)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (cos (* 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))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (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 a 2) (pow (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) #s(hole binary64 (+ (sqrt (/ (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 a 2) (pow (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) #s(hole binary64 (sqrt (/ (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 (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 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))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (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 (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (/ (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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (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 (* 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (cos (* 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) (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (pow y-scale 2))) (pow b 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (/ (* (pow a 4) (pow x-scale 2)) (pow y-scale 4)))) (pow b 4)) (pow x-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (pow b 2)) (pow x-scale 2))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 4 (/ (* (pow a 6) (* (pow b 6) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (pow y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow a 6) (* (pow b 6) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow x-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))))) (pow x-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (sqrt (pow b 4)))) (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* 1/2 (/ (* (pow a 6) (* (pow b 6) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3))))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (/ (pow a 2) (pow y-scale 2))))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))) (/ (pow a 2) (pow y-scale 2))))) (pow b 2))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (sqrt (pow b 4)) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (* (pow y-scale 2) (sqrt (pow b 4)))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4))))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2)) (pow b 2)) (pow x-scale 2))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (/ (* (pow x-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 (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))))) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4)))))) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))) (pow x-scale 4))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (* (pow y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow a 4) (pow y-scale 4)) (/ (pow b 4) (pow x-scale 4))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (pow x-scale 2)))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (pow x-scale 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (* (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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (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 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (sin (* 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) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (pow x-scale 2))) (pow a 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (/ (* (pow b 4) (pow y-scale 2)) (pow x-scale 4)))) (pow a 4)) (pow y-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 4 (/ (* (pow a 6) (* (pow b 6) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (pow x-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 1/2 (/ (* (pow a 6) (* (pow b 6) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow y-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2))))) (pow y-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (sqrt (pow a 4)))) (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (* (pow y-scale 2) (+ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (sqrt (pow a 4)))) (* 1/2 (/ (* (pow a 6) (* (pow b 6) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3))))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (sqrt (pow a 4)))) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (pow a 2)) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (sqrt (pow a 4)) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (* (pow x-scale 2) (sqrt (pow a 4)))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4))))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4))))))))) (pow y-scale 2))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (sqrt (* 8 (* (pow a 4) (* (pow b 4) (+ (sqrt (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 b 2))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (sqrt (* 8 (* (pow a 4) (* (pow b 4) (+ (sqrt (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 b 2)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) #s(hole binary64 (* x-scale (sqrt (* 8 (* (pow a 4) (* (pow b 4) (+ (sqrt (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)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (* (pow a 4) (* (pow b 4) (+ (sqrt (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))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) #s(hole binary64 (/ (sqrt (* 8 (* (pow a 4) (* (pow b 4) (+ (sqrt (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) #s(hole binary64 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 4)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 4))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (/ (* (pow y-scale 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 (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4)))))) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4))))) (pow y-scale 4))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (* (pow y-scale 2) (pow (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (pow y-scale 2)))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (pow y-scale 2))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))

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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 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))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.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 b b)
(*.f64 x-scale x-scale)
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(*.f64 a a)
(*.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
(.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b))))
#s(literal 1/4 binary64)
(/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (*.f64 b b)))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
#s(literal 8 binary64)
(/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(pow.f64 a #s(literal 4 binary64))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(pow.f64 b #s(literal 4 binary64))
(+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
(.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b))))
(/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b)))
(.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.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)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))
(/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 a (cos.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/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
(pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 b (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b)))
#s(literal -1/4 binary64)
(/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))
(.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
(fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
(/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
(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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
(.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
(/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))
(pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))
(+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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/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 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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/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 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))))))) (.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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.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 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.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 (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 8 binary64) (/.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 (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))))))
#s(approx (* (* 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))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 4 (* (* b a) (* b (neg a)))) (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* (* b a) (* b (neg a))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#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 (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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)) (pow.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)))) #s(literal 2 binary64)))))) (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))))) (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 (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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (pow.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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)) (pow.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)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (pow.f64 (cos.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (pow.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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)) (pow.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)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* a a) (* y-scale y-scale)) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* a a) (pow.f64 a #s(literal 2 binary64)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* 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)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 a #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 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #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 -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #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 -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 a #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 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (pow a 4) (pow.f64 a #s(literal 4 binary64)))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-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 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #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 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) (+.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (* (* a a) (* b b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #s(literal 2 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 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #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/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (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 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* 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)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 a #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* 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 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* 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 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (+.f64 (/.f64 (.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (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 (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)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (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 (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)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.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 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.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 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.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 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.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 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.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)))) #s(literal 3 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))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (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))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.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)))) #s(literal 3 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))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* 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 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* 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 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 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)) (.f64 (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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 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)) (.f64 (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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 4 binary64)))) (/.f64 (pow.f64 (cos.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 (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.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 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/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 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #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/8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/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 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))))))) (.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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.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 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (pow.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))))))
#s(approx 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 (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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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)) (pow.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)))) #s(literal 2 binary64)))))) (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))))) (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 (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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (pow.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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)) (pow.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)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 (* b (cos (* (/ angle 180) (PI)))) (.f64 b (cos.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))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (pow.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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)) (pow.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)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (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)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (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)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* b b) (pow.f64 b #s(literal 2 binary64)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #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/8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 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 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 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 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 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 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (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 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 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 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 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 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* 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)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (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 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 4 binary64)) (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 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.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 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (pow b 4) (pow.f64 b #s(literal 4 binary64)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.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 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.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 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 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 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #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/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (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 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (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 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #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 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (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 b #s(literal 2 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #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 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #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 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* 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)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (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 b #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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 b #s(literal 4 binary64)) (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 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 (/.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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 (/.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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 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 (/.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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 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 (.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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 4 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)))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 6 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 6 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (.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)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 6 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.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)))) #s(literal 3 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))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (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))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.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)))) #s(literal 3 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))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.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 (.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)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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 y-scale #s(literal 2 binary64))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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 y-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.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 (.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))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.f64 #s(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 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.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)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.f64 #s(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 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.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)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.f64 #s(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 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.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 (.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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.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)))) (fma.f64 #s(literal -1/2 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)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.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)))) (fma.f64 #s(literal -1/2 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)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.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))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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)))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.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)))) (fma.f64 #s(literal -1/2 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)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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))))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.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 y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #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 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/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))))))) (sqrt.f64 (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)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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 (pow.f64 y-scale #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (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))))))) (sqrt.f64 (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))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.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 (-.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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 #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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (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))))))) (sqrt.f64 (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))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 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))))))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 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))))))) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 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))))))) (-.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 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))))))) (-.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.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 (-.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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 #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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.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 (-.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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 #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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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/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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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))))))) (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (/.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 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #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 (.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 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (.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 (/.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 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale) (.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (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/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (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/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (.f64 #s(literal 1/180 binary64) (.f64 a (*.f64 angle (PI.f64)))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 a (PI.f64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 a (pow.f64 (PI.f64) #s(literal 3 binary64))) (.f64 #s(literal 1/22674816000000 binary64) (.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 a (PI.f64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 a (pow.f64 (PI.f64) #s(literal 3 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/30855889612800000000 binary64) (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (.f64 #s(literal 1/22674816000000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))
#s(approx (sin (* (/ angle 180) (PI))) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
#s(approx (sin (* (/ angle 180) (PI))) (.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
#s(approx (sin (* (/ angle 180) (PI))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
#s(approx (sin (* (/ angle 180) (PI))) (.f64 angle (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (/ angle 180) (*.f64 #s(literal 1/180 binary64) angle))
#s(approx angle angle)
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (.f64 #s(literal -1/64800 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/25194240000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/24488801280000000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 #s(literal 1/25194240000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/64800 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 #s(literal 1/25194240000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/24488801280000000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale) (.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (.f64 #s(literal -1/64800 binary64) (.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/25194240000 binary64) (.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/24488801280000000 binary64) (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 #s(literal 1/25194240000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 #s(literal 1/180 binary64) (.f64 angle (*.f64 b (PI.f64)))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64)))) (.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 b (PI.f64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64))) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 b (PI.f64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (pow.f64 (PI.f64) #s(literal 7 binary64)))) (.f64 #s(literal 1/22674816000000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (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 #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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (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 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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 (-.f64 (fma.f64 #s(literal 2 binary64) (/.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 #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/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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 (-.f64 (fma.f64 #s(literal 2 binary64) (/.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 #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/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (fma.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (fma.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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 (-.f64 (fma.f64 #s(literal 2 binary64) (/.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 #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/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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 (-.f64 (fma.f64 #s(literal 2 binary64) (/.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 #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/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.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 (-.f64 (fma.f64 #s(literal 2 binary64) (/.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 #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/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* 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)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (pow.f64 y-scale #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)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* 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)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)))))))) (pow.f64 y-scale #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/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* 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)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)))))))) (pow.f64 y-scale #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/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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)))))))))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 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 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.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 #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/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (fma.f64 #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/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.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 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* angle (PI)) (*.f64 angle (PI.f64)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #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 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.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))) (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.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))) (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.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))) (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.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/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.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)))) (.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 y-scale #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 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.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)))) (.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 y-scale #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 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* 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))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* 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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (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 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* 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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* 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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 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/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (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 (* (cos (* 1/180 (* angle (PI)))) (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/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (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/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/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 (* (cos (* 1/180 (* angle (PI)))) (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/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 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))))) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 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))))) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (fma.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 (PI.f64) #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))))))))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (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/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (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/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 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/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (fma.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (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/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 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/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (fma.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (fma.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)) (fma.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)) (fma.f64 #s(literal -1/4407984230400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 #s(literal -1/30855889612800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)))))))))))))))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.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 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 y-scale #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 (-.f64 (.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/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/.f64 #s(literal -1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (-.f64 (.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 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 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (-.f64 (.f64 (pow.f64 angle #s(literal 2 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 (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)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (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)))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (-.f64 (.f64 (pow.f64 angle #s(literal 2 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 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (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 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (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)))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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)) (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) (* 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)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.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 (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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (fma.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))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (fma.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/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (fma.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/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 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/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (.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 (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (.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/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 (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (.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/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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.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 #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 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.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))) (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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.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))) (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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 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/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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)))))))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.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 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.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 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (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) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (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) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.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 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (-.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 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.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 #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (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 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (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 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 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))))) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 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))))) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (fma.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (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 (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (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 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 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))))) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 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))))) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (fma.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))) (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #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 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #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 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 (-.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 #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #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 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (-.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 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (-.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 #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (/.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/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 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 angle #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 (.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/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 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (fma.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))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (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/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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)) (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 (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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)) (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 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 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 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 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 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 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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))))))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(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 (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) x-scale))
#s(approx (sin (* (/ angle 180) (PI))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (cos (* (/ angle 180) (PI))) (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) y-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* 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)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (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 (cos.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 (sin (* 1/180 (* angle (PI)))) 2) (* 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 (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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos (* 1/180 (* angle (PI)))) 2) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 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 (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #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/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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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))))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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))))))) (/.f64 (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 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))))))) (/.f64 (-.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 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))))))) (/.f64 (-.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (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 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (pow.f64 x-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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64)) (pow.f64 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 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (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)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (* 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 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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (sqrt.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)))) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.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))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 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 (sqrt.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/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 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 (sqrt.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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (sqrt.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/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))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 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 (sqrt.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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.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))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (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))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (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 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (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 b #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* x-scale x-scale) (pow.f64 x-scale #s(literal 2 binary64)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* 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)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #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)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.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 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.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 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.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 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #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 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #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)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #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 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (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 -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (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 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (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 b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 x-scale #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)) (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 x-scale #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 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #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)) (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.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 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (sqrt.f64 (pow.f64 (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.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 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.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 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (cos.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 (.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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (pow.f64 (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (cos.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 (.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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 (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 (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 (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) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 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 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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)))))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 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 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 x-scale #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)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 x-scale #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 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (sqrt.f64 (.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 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (sqrt.f64 (.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))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (sqrt.f64 (.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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))))) (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 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (sqrt.f64 (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (.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 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.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))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (.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 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (sqrt.f64 (.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (.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 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))) (sqrt.f64 (.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))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.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 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.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 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.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 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) 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 -4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) 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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) 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 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) 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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-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 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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/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 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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/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 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) x-scale))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.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 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) x-scale))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.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 b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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)) (sqrt.f64 (/.f64 (pow.f64 (cos.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/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.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 (.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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.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 (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.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 (.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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) x-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) x-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) x-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) x-scale))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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/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/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 -4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) 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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) 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 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) x-scale)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) x-scale)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) 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 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 b #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 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #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/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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/.f64 (-.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/.f64 (-.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (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 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx 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 (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (sqrt.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)))) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 (sqrt.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))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.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))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 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 (sqrt.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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 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 (sqrt.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 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (sqrt.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/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))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 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 (sqrt.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 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.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))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 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 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (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))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (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 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (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 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* y-scale y-scale) (pow.f64 y-scale #s(literal 2 binary64)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* 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)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.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 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #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)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.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 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.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 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.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 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 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 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 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 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 b #s(literal 2 binary64))))))
#s(approx (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 b #s(literal 2 binary64)))))
#s(approx (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* 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)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #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 -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #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 -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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 -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (/.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 (cos.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 (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 (cos.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 (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (/.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 (cos.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 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (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 (cos.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 (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (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)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (cos.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 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (cos.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 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* 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 (cos.f64 (.f64 #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)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 (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 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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))))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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))))))) (/.f64 (-.f64 (.f64 #s(literal -4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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))))))) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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))))))) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 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 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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/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 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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/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 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) y-scale))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.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 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) y-scale))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.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 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64)))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (/.f64 (pow.f64 (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (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) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.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 (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) y-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) y-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) y-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))))))) y-scale))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.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))) (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 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.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))) (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 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 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 (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (.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))) (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 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 (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 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))))))) y-scale)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) y-scale)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))))))) y-scale)))

eval2.6s (7.3%)

Memory: 42.2MiB live, 2 787.4MiB allocated; 1.7s collecting garbage
Compiler: Compiled 377 790 to 20 286 computations (94.6% saved)

prune1.6s (4.5%)

Memory

24.7MiB live, 2 203.1MiB allocated; 256ms collecting garbage

Pruning

70 alts after pruning (69 fresh and 1 done)

	Pruned	Kept	Total
New	1 744	60	1 804
Fresh	16	9	25
Picked	4	1	5
Done	0	0	0
Total	1 764	70	1 834

Accuracy

20.9%

Counts

1 834 → 70

Alt Table

Click to see full alt table

Status	Accuracy	Program
	3.8%	(/.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-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))))
	5.9%	(/.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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-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))))
	3.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)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.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))))
	5.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)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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.7%	(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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))))
	3.6%	(/.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 #s(approx (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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))))
	5.4%	(/.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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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.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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 y-scale y-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))))
	6.6%	(/.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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.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))))
	0.2%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 x-scale) (.f64 y-scale y-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))))
▶	0.7%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
	0.4%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ ( (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
	1.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 a a) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) 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.2%	(/.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 a a) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-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))))
	0.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 a a) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-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))))
	0.2%	(/.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)))))) #s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) (/.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))))
	1.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) #s(approx ( (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
▶	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 b b)))))
✓	1.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 #s(approx (pow (/ (+ (pow ( a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b)))))
	1.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 #s(approx ( (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b)))))
	1.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 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ ( (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 x-scale (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 a a) (.f64 b b)))))
	1.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 (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	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 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (.f64 (.f64 a a) (.f64 b b)))))
▶	1.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 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 a a))))
	1.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 #s(approx ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))))
	1.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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64))))))
	0.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))))
	3.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) #s(approx (/ ( x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #s(literal 2 binary64))))))
	2.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (/ ( x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))
	2.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) #s(approx (/ ( x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (pow.f64 a #s(literal 2 binary64))))))
▶	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 #s(approx ( (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 b b))))
	0.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale))))) (*.f64 b b))))
	4.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))))) (.f64 b b))))
	1.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (.f64 b b))))
	2.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (*.f64 b b))))
	1.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 b b))))
	0.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b b))))
	0.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b b))))
	0.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (.f64 b b))))
	0.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 b b))))
	4.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 b b))))
	0.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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
	0.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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
	1.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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))))
	2.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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))))
	0.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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
	0.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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
	0.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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64))))))
	0.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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
	1.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))) #s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
	0.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 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 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 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (pow.f64 a #s(literal 2 binary64))))))
	0.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))) #s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
	0.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(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64)))))))

Compiler

Compiled 28 282 to 15 277 computations (46% saved)

series1.3s (3.7%)

Memory

96.1MiB live, 1 288.0MiB allocated; 217ms collecting garbage

Counts

137 → 1 479

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

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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (/ (* (pow a 2) (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 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))))))) (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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)))))))))))))))
#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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow b 4) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (pow y-scale 4)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (* (* a a) (* b b)) #s(hole binary64 (* (pow a 2) (pow b 2))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* (pow a 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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)))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (pow a 4) #s(hole binary64 (pow a 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))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow a 4) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow y-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow a 4) (pow x-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (* (pow a 2) (pow x-scale 2))) (/ 1 (pow y-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 2) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 2) x-scale) #s(hole binary64 (/ (pow b 2) x-scale)))
#s(approx (pow b 2) #s(hole binary64 (pow b 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 4)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (pow b 4) #s(hole binary64 (pow b 4)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) #s(hole binary64 (* 8 (/ (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) #s(hole binary64 (/ (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (sqrt (/ (pow b 4) (pow x-scale 4))) #s(hole binary64 (* (pow b 2) (sqrt (/ 1 (pow x-scale 4))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #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 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))
#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 (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow a 2))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow x-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow b 4) (pow y-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (/ 1 (pow x-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 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 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow angle 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/8 (/ (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (* -1 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* -4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (/ (/ (+ (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 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 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 (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 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 (+ (* -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 (* -1/64800 (* a (* (pow angle 2) (pow (PI) 2)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* 1/25194240000 (* a (* (pow angle 2) (pow (PI) 4)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* a (* (pow angle 2) (pow (PI) 6)))) (* 1/25194240000 (* a (pow (PI) 4))))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 1))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))))
#s(approx (* (/ angle 180) (PI)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (/ angle 180) #s(hole binary64 (* 1/180 angle)))
#s(approx angle #s(hole binary64 angle))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* angle (* b (PI))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (pow (PI) 3)))) (* 1/180 (* b (PI)))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* 1/22674816000000 (* (pow angle 2) (* b (pow (PI) 5))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (pow (PI) 7)))) (* 1/22674816000000 (* b (pow (PI) 5)))))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 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))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (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 (- (/ (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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow a 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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))) (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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))) (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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))))) (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 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 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 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))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (sqrt (pow b 4))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 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))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (sqrt (pow b 4))))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 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))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (sqrt (pow b 4))))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (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)))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (pow b 2))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) (pow b 2)))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow b 2)))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (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 (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (sqrt (pow b 4))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (+ (sqrt (pow b 4)) (* -1/32400 (/ (* (pow angle 2) (* (pow b 4) (pow (PI) 2))) (sqrt (pow b 4)))))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* 1/2 (/ (* (pow angle 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))))))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))))))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* (pow b 4) (pow (PI) 2)))) (pow b 4))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4)))))))) (pow b 4))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))))) (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))))) (pow b 4))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))))))))))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#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 (* -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 (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))) (/ (* (pow a 2) (* (pow angle 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow a 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow a 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow angle 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow a 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow angle 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 4 (/ (* (pow a 4) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow angle 2) (+ (* (pow a 4) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow angle 2) (+ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow angle 2) (+ (* (pow a 4) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))))) (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))))))))))))) (/ 1 (pow x-scale 2))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ 1 (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ 1 (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (+ (* 1/2267481600000 (pow (PI) 5)) (* (pow angle 2) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))))))))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ 1 (pow x-scale 2))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))))))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (/ 1 (pow x-scale 2)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))))))))))))) (/ 1 (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (* (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))))))) #s(hole binary64 (* -1 (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 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))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 4)))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 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))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (/ (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (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 (* 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (cos (* 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) (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (pow y-scale 2))) (pow b 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (/ (* (pow a 4) (pow x-scale 2)) (pow y-scale 4)))) (pow b 4)) (pow x-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (pow b 2)) (pow x-scale 2))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (sqrt (/ (pow b 4) (pow x-scale 4))) #s(hole binary64 (/ (sqrt (pow b 4)) (pow x-scale 2))))
#s(approx (pow x-scale 4) #s(hole binary64 (pow x-scale 4)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 1/8 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* b (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* b (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow a 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow a 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (* (pow y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow a 4) (pow y-scale 4)) (/ (pow b 4) (pow x-scale 4))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* x-scale (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* 1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1/4 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (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 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (sin (* 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) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (pow x-scale 2))) (pow a 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (/ (* (pow b 4) (pow y-scale 2)) (pow x-scale 4)))) (pow a 4)) (pow y-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) #s(hole binary64 (/ 2 (pow y-scale 2))))
#s(approx (sqrt (/ 1 (pow y-scale 4))) #s(hole binary64 (/ 1 (pow y-scale 2))))
#s(approx (/ 1 (pow y-scale 4)) #s(hole binary64 (/ 1 (pow y-scale 4))))
#s(approx (pow y-scale 4) #s(hole binary64 (pow y-scale 4)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (pow x-scale 2))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 1/8 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* b (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* b (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow a 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow a 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow y-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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow a 2))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (pow x-scale 2))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (/ (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))

Calls

15 calls:

Time	Variable		Point	Expression
100.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 b 2) x-scale) (pow b 2) (/ (/ (+ (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)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) (* x-scale x-scale) (/ (* a a) (* y-scale y-scale)) (* a a) (* y-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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 4)) 1 (pow y-scale 4) (/ 1 (pow y-scale 2)) (pow y-scale 2) (* (* x-scale x-scale) (* y-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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 4) (pow x-scale 4)) (pow x-scale 4) (/ (pow b 2) (pow x-scale 2)) (pow x-scale 2) (* (pow x-scale 2) (pow y-scale 2)) (* (* a a) (* b b)) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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)))))) (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))
99.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 b 2) x-scale) (pow b 2) (/ (/ (+ (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)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) (* x-scale x-scale) (/ (* a a) (* y-scale y-scale)) (* a a) (* y-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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 4)) 1 (pow y-scale 4) (/ 1 (pow y-scale 2)) (pow y-scale 2) (* (* x-scale x-scale) (* y-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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 4) (pow x-scale 4)) (pow x-scale 4) (/ (pow b 2) (pow x-scale 2)) (pow x-scale 2) (* (pow x-scale 2) (pow y-scale 2)) (* (* a a) (* b b)) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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)))))) (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))
76.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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 b 2) x-scale) (pow b 2) (/ (/ (+ (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)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) (* x-scale x-scale) (/ (* a a) (* y-scale y-scale)) (* a a) (* y-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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 4)) 1 (pow y-scale 4) (/ 1 (pow y-scale 2)) (pow y-scale 2) (* (* x-scale x-scale) (* y-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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 4) (pow x-scale 4)) (pow x-scale 4) (/ (pow b 2) (pow x-scale 2)) (pow x-scale 2) (* (pow x-scale 2) (pow y-scale 2)) (* (* a a) (* b b)) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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)))))) (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))
70.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 b 2) x-scale) (pow b 2) (/ (/ (+ (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)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) (* x-scale x-scale) (/ (* a a) (* y-scale y-scale)) (* a a) (* y-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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 4)) 1 (pow y-scale 4) (/ 1 (pow y-scale 2)) (pow y-scale 2) (* (* x-scale x-scale) (* y-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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 4) (pow x-scale 4)) (pow x-scale 4) (/ (pow b 2) (pow x-scale 2)) (pow x-scale 2) (* (pow x-scale 2) (pow y-scale 2)) (* (* a a) (* b b)) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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)))))) (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))
65.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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 b 2) x-scale) (pow b 2) (/ (/ (+ (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)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) (* x-scale x-scale) (/ (* a a) (* y-scale y-scale)) (* a a) (* y-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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 4)) 1 (pow y-scale 4) (/ 1 (pow y-scale 2)) (pow y-scale 2) (* (* x-scale x-scale) (* y-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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 4) (pow x-scale 4)) (pow x-scale 4) (/ (pow b 2) (pow x-scale 2)) (pow x-scale 2) (* (pow x-scale 2) (pow y-scale 2)) (* (* a a) (* b b)) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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)))))) (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))

rewrite2.0s (5.5%)

Memory

65.3MiB live, 2 217.2MiB allocated; 404ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	8811	636982
0	9045	636982
0	9045	627377

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

1 616 → 1 617

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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))
(+.f64 (/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale)
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))
(/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)
(pow.f64 b #s(literal 2 binary64))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
angle
#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))))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.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 b b)
(*.f64 x-scale x-scale)
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(*.f64 a a)
(*.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b)))
#s(literal -1/4 binary64)
(/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))
(.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
#s(literal 8 binary64)
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
(pow.f64 b #s(literal 4 binary64))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
(+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))
#s(literal 1 binary64)
(pow.f64 y-scale #s(literal 4 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))
(pow.f64 y-scale #s(literal 2 binary64))
(.f64 (.f64 x-scale x-scale) (*.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b))))
#s(literal 1/4 binary64)
(/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
(.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
(.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
(pow.f64 a #s(literal 2 binary64))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
(.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
(+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
(sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
(/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))
(pow.f64 x-scale #s(literal 4 binary64))
(/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))
(pow.f64 x-scale #s(literal 2 binary64))
(*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))
(.f64 (.f64 a a) (*.f64 b b))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
(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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
(/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.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 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 (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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))
(pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
(.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (cos.f64 (.f64 #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 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 a a))))
(.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 a a)))
(/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 a a))
(.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
(pow.f64 a #s(literal 4 binary64))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
(fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
(/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (/ (* (pow a 2) (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 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))))))) (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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)))))))))))))))
#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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow b 4) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (pow y-scale 4)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (* (* a a) (* b b)) #s(hole binary64 (* (pow a 2) (pow b 2))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* (pow a 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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)))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (pow a 4) #s(hole binary64 (pow a 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))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow a 4) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow y-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow a 4) (pow x-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (* (pow a 2) (pow x-scale 2))) (/ 1 (pow y-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow a 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 2) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 2) x-scale) #s(hole binary64 (/ (pow b 2) x-scale)))
#s(approx (pow b 2) #s(hole binary64 (pow b 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 4)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (pow b 4) #s(hole binary64 (pow b 4)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) #s(hole binary64 (* 8 (/ (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) #s(hole binary64 (/ (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) #s(hole binary64 (* (pow b 6) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (sqrt (/ (pow b 4) (pow x-scale 4))) #s(hole binary64 (* (pow b 2) (sqrt (/ 1 (pow x-scale 4))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #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 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))
#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 (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow a 2))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow x-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow b 4) (pow y-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (/ 1 (pow x-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 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 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* (pow a 2) (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (* (pow b 3) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow angle 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/8 (/ (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (* -1 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* -4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (/ (/ (+ (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 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 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 (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 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 (+ (* -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 (* -1/64800 (* a (* (pow angle 2) (pow (PI) 2)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* 1/25194240000 (* a (* (pow angle 2) (pow (PI) 4)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* a (* (pow angle 2) (pow (PI) 6)))) (* 1/25194240000 (* a (pow (PI) 4))))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 1))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))))
#s(approx (* (/ angle 180) (PI)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (/ angle 180) #s(hole binary64 (* 1/180 angle)))
#s(approx angle #s(hole binary64 angle))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* angle (* b (PI))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (pow (PI) 3)))) (* 1/180 (* b (PI)))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* 1/22674816000000 (* (pow angle 2) (* b (pow (PI) 5))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (pow (PI) 7)))) (* 1/22674816000000 (* b (pow (PI) 5)))))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 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))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (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 (- (/ (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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow a 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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))) (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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))) (/ (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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))))) (/ (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 b 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (pow b 4) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 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 b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (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)))))) (+ (* 2 (/ (* (pow b 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))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 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 x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (/ (* (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 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 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 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))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (sqrt (pow b 4))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 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))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (sqrt (pow b 4))))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 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))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (sqrt (pow b 4))))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (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)))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (pow b 2))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) (pow b 2)))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow b 2)))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (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 (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (sqrt (pow b 4))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (+ (sqrt (pow b 4)) (* -1/32400 (/ (* (pow angle 2) (* (pow b 4) (pow (PI) 2))) (sqrt (pow b 4)))))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* 1/2 (/ (* (pow angle 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))))))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))))))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* (pow b 4) (pow (PI) 2)))) (pow b 4))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4)))))))) (pow b 4))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))))) (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))))) (pow b 4))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))))))))))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#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 (* -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 (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))) (/ (* (pow a 2) (* (pow angle 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow a 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow a 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow angle 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow a 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow angle 2) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 4 (/ (* (pow a 4) (* b (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow angle 2) (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow angle 2) (+ (* (pow a 4) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))) (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow angle 2) (+ (* (pow a 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (* (pow angle 2) (+ (* (pow a 4) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))))) (* (pow a 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))))))))))))) (/ 1 (pow x-scale 2))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ 1 (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ 1 (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (+ (* 1/2267481600000 (pow (PI) 5)) (* (pow angle 2) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))))))))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ 1 (pow x-scale 2))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))))))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (/ 1 (pow x-scale 2)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))))))))))))) (/ 1 (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (* (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))))))) #s(hole binary64 (* -1 (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 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))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) #s(hole binary64 (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 4)))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 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))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (/ (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (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 (* 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (cos (* 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) (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (pow y-scale 2))) (pow b 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (/ (* (pow a 4) (pow x-scale 2)) (pow y-scale 4)))) (pow b 4)) (pow x-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (pow b 2)) (pow x-scale 2))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (sqrt (/ (pow b 4) (pow x-scale 4))) #s(hole binary64 (/ (sqrt (pow b 4)) (pow x-scale 2))))
#s(approx (pow x-scale 4) #s(hole binary64 (pow x-scale 4)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow y-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 1/8 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* b (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow a 2)))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* b (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow a 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow a 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (* (pow y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow a 4) (pow y-scale 4)) (/ (pow b 4) (pow x-scale 4))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* x-scale (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* 1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 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 y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1/4 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (/ (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow a 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* b (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* b (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (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 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (sin (* 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) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (pow x-scale 2))) (pow a 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (/ (* (pow b 4) (pow y-scale 2)) (pow x-scale 4)))) (pow a 4)) (pow y-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) #s(hole binary64 (/ 2 (pow y-scale 2))))
#s(approx (sqrt (/ 1 (pow y-scale 4))) #s(hole binary64 (/ 1 (pow y-scale 2))))
#s(approx (/ 1 (pow y-scale 4)) #s(hole binary64 (/ 1 (pow y-scale 4))))
#s(approx (pow y-scale 4) #s(hole binary64 (pow y-scale 4)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (pow x-scale 2))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 4 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 1/8 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* b (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* b (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow a 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 4) (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow a 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow a 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow a 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow y-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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (/ (* (pow b 2) (pow (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 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow a 2))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (pow x-scale 2))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) y-scale))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow a 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow a 2) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))) (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (/ (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow a 2)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* (pow a 2) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow a 2)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* b (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (* b (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* b (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow a 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow a 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))

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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))
(+.f64 (/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale)
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))
(/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)
(pow.f64 b #s(literal 2 binary64))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
angle
#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))))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.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 b b)
(*.f64 x-scale x-scale)
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(*.f64 a a)
(*.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b)))
#s(literal -1/4 binary64)
(/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))
(.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
#s(literal 8 binary64)
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
(pow.f64 b #s(literal 4 binary64))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
(+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))
#s(literal 1 binary64)
(pow.f64 y-scale #s(literal 4 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))
(pow.f64 y-scale #s(literal 2 binary64))
(.f64 (.f64 x-scale x-scale) (*.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b))))
#s(literal 1/4 binary64)
(/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
(.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
(.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
(pow.f64 a #s(literal 2 binary64))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
(.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
(+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
(sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
(/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))
(pow.f64 x-scale #s(literal 4 binary64))
(/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))
(pow.f64 x-scale #s(literal 2 binary64))
(*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))
(.f64 (.f64 a a) (*.f64 b b))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
(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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
(/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.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 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 (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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))
(pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
(.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (cos.f64 (.f64 #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 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 a a))))
(.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 a a)))
(/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 a a))
(.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
(pow.f64 a #s(literal 4 binary64))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
(fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
(/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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/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 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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/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 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))))))) (.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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.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 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.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 (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 8 binary64) (/.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 (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))))))
#s(approx (* (* 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))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 4 (* (* b a) (* b (neg a)))) (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* (* b a) (* b (neg a))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#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 (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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)) (pow.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)))) #s(literal 2 binary64)))))) (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))))) (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 (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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (pow.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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)) (pow.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)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (pow.f64 (cos.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (pow.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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)) (pow.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)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* a a) (* y-scale y-scale)) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* a a) (pow.f64 a #s(literal 2 binary64)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (* (* a a) (* b b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 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)))))))
#s(approx (pow a 4) (pow.f64 a #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 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.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 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.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 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.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 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.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 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.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)))) #s(literal 3 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))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (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))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.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)))) #s(literal 3 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))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.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 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #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 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/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 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #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/8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/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 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))))))) (.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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 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))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.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 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 4 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (pow.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))))))
#s(approx 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 (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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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)) (pow.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)))) #s(literal 2 binary64)))))) (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))))) (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 (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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (pow.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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)) (pow.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)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (pow b 2) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))
#s(approx (pow b 2) (pow.f64 b #s(literal 2 binary64)))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))))) (pow.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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)) (pow.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)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (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)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (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)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 4 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)))))))
#s(approx (pow b 4) (pow.f64 b #s(literal 4 binary64)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #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/8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 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 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 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 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 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 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (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 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 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 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 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 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (sqrt (/ (pow b 4) (pow x-scale 4))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 6 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 6 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (.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))))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 6 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.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)))) #s(literal 3 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))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (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))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.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)))) #s(literal 3 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))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.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 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (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))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 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)) (pow.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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)) (pow.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (.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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/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))))))) (sqrt.f64 (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)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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 (pow.f64 y-scale #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (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))))))) (sqrt.f64 (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))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.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 (-.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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 #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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (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))))))) (sqrt.f64 (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))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 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))))))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 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))))))) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 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))))))) (-.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 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))))))) (-.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.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 (-.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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 #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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.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 (-.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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 #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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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/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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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))))))) (sqrt.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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/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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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))))))) (sqrt.f64 (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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #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 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 (.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 (/.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 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #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 (.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 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (.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 (/.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 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale) (.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale) (.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (.f64 #s(literal -1/64800 binary64) (.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal 1/25194240000 binary64) (.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/24488801280000000 binary64) (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 #s(literal 1/25194240000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/64800 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 #s(literal 1/25194240000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/24488801280000000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
#s(approx (/ angle 180) (*.f64 #s(literal 1/180 binary64) angle))
#s(approx angle angle)
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 #s(literal 1/180 binary64) (.f64 angle (*.f64 b (PI.f64)))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64)))) (.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 b (PI.f64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64))) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 b (PI.f64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (pow.f64 (PI.f64) #s(literal 7 binary64)))) (.f64 #s(literal 1/22674816000000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))
#s(approx (sin (* (/ angle 180) (PI))) (.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
#s(approx (sin (* (/ angle 180) (PI))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
#s(approx (sin (* (/ angle 180) (PI))) (.f64 angle (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 (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (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 #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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (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 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #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 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #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 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 b #s(literal 4 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/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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.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))) (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.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))) (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.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))) (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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))))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.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 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal -1/32400 binary64) (/.f64 (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 -2 binary64) (/.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)))) (.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 y-scale #s(literal 2 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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.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 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.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 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #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 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.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 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (pow.f64 b #s(literal 4 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 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 b #s(literal 4 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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (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) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (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) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.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 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 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/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 2 binary64) (/.f64 (.f64 (pow.f64 b #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))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (pow.f64 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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/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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.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 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 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #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 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 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 (/.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (pow.f64 (PI.f64) #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))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (pow.f64 (PI.f64) #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))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (pow.f64 (PI.f64) #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))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (pow.f64 (PI.f64) #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))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/16200 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #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/16200 binary64) (.f64 (pow.f64 (PI.f64) #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))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))))
#s(approx (* angle (PI)) (*.f64 angle (PI.f64)))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (.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 (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (.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/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 (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (.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/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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #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 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 2 binary64)) (.f64 b (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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/8 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 2 binary64)) (.f64 b (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 (pow.f64 angle #s(literal 2 binary64)) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.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))) (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #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 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (pow.f64 a #s(literal 4 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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 4 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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 (pow.f64 a #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.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/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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 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 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/4 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))))) (.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 y-scale #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/16200 binary64) (/.f64 (pow.f64 (PI.f64) #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 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (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 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/16200 binary64) (/.f64 (pow.f64 (PI.f64) #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 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* 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))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* 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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (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 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* 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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* 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)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (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/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 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/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (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 (* (cos (* 1/180 (* angle (PI)))) (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/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (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/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/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 (* (cos (* 1/180 (* angle (PI)))) (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/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 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))))) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 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))))) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (fma.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 (PI.f64) #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))))))))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (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/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (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/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 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/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (fma.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (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/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 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/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (fma.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (fma.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)) (fma.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)) (fma.f64 #s(literal -1/4407984230400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 #s(literal -1/30855889612800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)))))))))))))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.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 y-scale #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/16200 binary64) (/.f64 (pow.f64 (PI.f64) #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 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.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)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/1020366720000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (.f64 #s(literal -1/1574640000 binary64) (/.f64 (pow.f64 (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/16200 binary64) (/.f64 (pow.f64 (PI.f64) #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 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (fma.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 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 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 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 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (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))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (fma.f64 (pow.f64 angle #s(literal 2 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 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 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 (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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))))))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (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))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (fma.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))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (fma.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/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (fma.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/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 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/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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)) (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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.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 (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 (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (fma.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/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (fma.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/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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (fma.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/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))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 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/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #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)))))))))))))) (/.f64 #s(literal 1 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 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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))))))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(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 (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) x-scale))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) y-scale))
#s(approx (cos (* (/ angle 180) (PI))) (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (sin (* (/ angle 180) (PI))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 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 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (sqrt.f64 (.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)))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (pow (sin (* 1/180 (* angle (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 y-scale #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 (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #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/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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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))))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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))))))) (/.f64 (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 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))))))) (/.f64 (-.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 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))))))) (/.f64 (-.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (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 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (pow.f64 x-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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64)) (pow.f64 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 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (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)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (* 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 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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (sqrt.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)))) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.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))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 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 (sqrt.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/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 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 (sqrt.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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (sqrt.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/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))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 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 (sqrt.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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.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))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (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))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (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 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (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 b #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* x-scale x-scale) (pow.f64 x-scale #s(literal 2 binary64)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (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 -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (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 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (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 b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 x-scale #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)) (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 x-scale #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 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #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)) (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.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 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (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 x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (/ (pow b 4) (pow x-scale 4))) (/.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (pow x-scale 4) (pow.f64 x-scale #s(literal 4 binary64)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 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 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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)))))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 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 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 x-scale #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)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 x-scale #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 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (sqrt.f64 (.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 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.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 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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (sqrt.f64 (.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))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64)))))) (sqrt.f64 (.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.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))))) (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 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.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)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.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)))) #s(literal 2 binary64))))) (sqrt.f64 (.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 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 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/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #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 -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #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 -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.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 a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 x-scale #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)) (-.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 x-scale #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 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #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)) (-.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (cos.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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (-.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (sqrt.f64 (pow.f64 (cos.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)))))) (sqrt.f64 (pow.f64 (cos.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (-.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 (pow.f64 (cos.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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 (cos.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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (/.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 (cos.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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (pow.f64 (cos.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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (/.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 (cos.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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/.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 (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/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) 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 -4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) 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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) 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 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) 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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-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 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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/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 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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/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 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) x-scale))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.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 b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) x-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) x-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) x-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) x-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) x-scale))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))) x-scale))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.f64 #s(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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.f64 #s(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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.f64 #s(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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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)) (sqrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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)) (sqrt.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)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.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)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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)) (sqrt.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)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (sqrt.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)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.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/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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)) (sqrt.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)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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)) (sqrt.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/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.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)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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)) (sqrt.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/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.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)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.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 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (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 (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 -4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) 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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) 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 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) x-scale)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 a (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) x-scale)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #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/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) x-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 y-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (pow.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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))))))) x-scale)))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 b (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.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 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (sqrt.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)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))) 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 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 b #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 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #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/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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/.f64 (-.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/.f64 (-.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (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 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx 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 (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (sqrt.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)))) (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))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 (sqrt.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))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.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))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 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 (sqrt.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/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 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 (sqrt.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 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (sqrt.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/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))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 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 (sqrt.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 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.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))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (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))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (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 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (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 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* y-scale y-scale) (pow.f64 y-scale #s(literal 2 binary64)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #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 -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #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 -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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 -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (/ 1 (pow y-scale 4))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ 1 (pow y-scale 4)) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow y-scale 4) (pow.f64 y-scale #s(literal 4 binary64)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #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 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (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 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #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 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(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 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.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 -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.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 -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #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 a #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.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 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.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 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (sqrt.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 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (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 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.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 2 binary64))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (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 (sin.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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (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 (sin.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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 (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 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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))))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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))))))) (/.f64 (-.f64 (.f64 #s(literal -4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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))))))) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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))))))) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 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 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 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 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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/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 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.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/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 (sqrt.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))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) y-scale))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.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 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64)))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) y-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) y-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) y-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) y-scale))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))))))) y-scale))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.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))) (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 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.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))) (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 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 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 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))) y-scale))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 (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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #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/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 (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 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #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))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.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 (sqrt.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))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.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))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (sqrt.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))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.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 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #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))))) (sqrt.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)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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 (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))))))) y-scale)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (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(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (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(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (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)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) y-scale)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) y-scale)))
#s(approx (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) y-scale)))
#s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 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)))) (pow.f64 x-scale #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.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)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64)))))))))))) y-scale)))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 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 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))))) y-scale)))

eval5.2s (14.6%)

Memory: 98.3MiB live, 6 697.8MiB allocated; 2.0s collecting garbage
Compiler: Compiled 365 164 to 16 060 computations (95.6% saved)

prune1.6s (4.5%)

Memory

-9.5MiB live, 2 526.8MiB allocated; 211ms collecting garbage

Pruning

76 alts after pruning (75 fresh and 1 done)

	Pruned	Kept	Total
New	1 460	27	1 487
Fresh	16	48	64
Picked	5	0	5
Done	0	1	1
Total	1 481	76	1 557

Accuracy

25.1%

Counts

1 557 → 76

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	6.7%	(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-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))))
▶	3.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.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.7%	(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a #s(approx (cos ( (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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))))
	6.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 #s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) y-scale) y-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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))))
	6.6%	(/.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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.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))))
	0.7%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) #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))))))
	0.4%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 #s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
	0.4%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 #s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
	0.7%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 #s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
	1.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 a a) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) 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.2%	(/.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 a a) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-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))))
	0.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 a a) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-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))))
	1.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) #s(approx ( (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 b b)))))
✓	1.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 #s(approx (pow (/ (+ (pow ( a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b)))))
	1.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 #s(approx ( (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b)))))
	1.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 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ ( (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 x-scale (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 a a) (.f64 b b)))))
	1.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 (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	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 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (.f64 (.f64 a a) (.f64 b b)))))
	1.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 a a))))
	1.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) x-scale))))) (*.f64 a a))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) x-scale)))))) (.f64 a a))))
	4.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))) (.f64 a a))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))) (*.f64 a a))))
	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 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 a a))))
	1.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 a a))))
	3.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 b #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 a a))))
	1.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 b #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 a a))))
	2.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 b #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 a a))))
	1.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 #s(approx ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))))
▶	0.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))))
	3.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) #s(approx (/ ( x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #s(literal 2 binary64))))))
	2.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (/ ( x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))
	4.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) #s(approx (/ ( b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
▶	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 #s(approx ( (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 b b))))
	0.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale))))) (*.f64 b b))))
▶	4.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))))) (.f64 b b))))
	1.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (.f64 b b))))
	2.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (*.f64 b b))))
	1.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 b b))))
	0.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b b))))
	0.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b b))))
	0.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (.f64 b b))))
	4.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 b b))))
	0.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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
	0.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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
	1.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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))))
	2.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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))))
	0.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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
	0.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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
	0.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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 a #s(literal 2 binary64))))))
	0.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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
	1.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))) #s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
	0.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 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
	0.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))) #s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
	2.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(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
	0.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(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #s(literal 2 binary64)))))))

Compiler

Compiled 32 056 to 17 263 computations (46.1% saved)

series1.1s (3.1%)

Memory

70.1MiB live, 1 236.6MiB allocated; 254ms collecting garbage

Counts

124 → 898

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

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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (/ (* (pow a 2) (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 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))))))) (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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)))))))))))))))
#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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow b 4) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (pow y-scale 4)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (/ (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(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (/ (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(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (/ (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(hole binary64 (+ (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow a 4) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow y-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow a 4) (pow x-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (* (pow a 2) (pow x-scale 2))) (/ 1 (pow y-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (/ (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(hole binary64 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (/ (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(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (/ (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(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow a 2))) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow a 4)) (pow (cos (* 1/180 (* angle (PI)))) 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))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 2) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 2) x-scale) #s(hole binary64 (/ (pow b 2) x-scale)))
#s(approx (pow b 2) #s(hole binary64 (pow b 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 4)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (pow b 4) #s(hole binary64 (pow b 4)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) #s(hole binary64 (* a (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (* -1 (/ (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (pow y-scale 2))))) x-scale))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (/ (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (pow y-scale 2))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (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(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (/ (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(hole binary64 (+ (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (+ (* 2 (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow x-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow b 4) (pow y-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (/ 1 (pow x-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (/ (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(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (/ (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(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (+ (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (sin (* 1/180 (* angle (PI)))) 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))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow angle 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/8 (/ (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (* -1 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* -4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (/ (/ (+ (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 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 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 (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 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 (+ (* -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 (* -1/64800 (* a (* (pow angle 2) (pow (PI) 2)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* 1/25194240000 (* a (* (pow angle 2) (pow (PI) 4)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* a (* (pow angle 2) (pow (PI) 6)))) (* 1/25194240000 (* a (pow (PI) 4))))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 1))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))))
#s(approx (* (/ angle 180) (PI)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (/ angle 180) #s(hole binary64 (* 1/180 angle)))
#s(approx angle #s(hole binary64 angle))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* angle (* b (PI))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (pow (PI) 3)))) (* 1/180 (* b (PI)))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* 1/22674816000000 (* (pow angle 2) (* b (pow (PI) 5))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (pow (PI) 7)))) (* 1/22674816000000 (* b (pow (PI) 5)))))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 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))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (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 (- (/ (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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (+ (* -4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (+ (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) (* (pow angle 2) (+ (* -4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (+ (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) (* (pow angle 2) (+ (* -4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))) (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))))) (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))) (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow y-scale 2))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (sqrt (/ 1 (pow y-scale 4)))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* 1/2 (/ (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (sqrt (/ 1 (pow y-scale 4))))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) #s(hole binary64 (/ 1 (pow y-scale 4))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) #s(hole binary64 (+ (* -1/16200 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 4))) (/ 1 (pow y-scale 4)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow y-scale 4))) (* (pow angle 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4)))))))) (/ 1 (pow y-scale 4)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow y-scale 4))) (* (pow angle 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))) (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4)))))))))))) (/ 1 (pow y-scale 4)))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))))))))))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (/ 1 (pow y-scale 2))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2))) (/ 1 (pow y-scale 2)))))
#s(approx (/ (pow (cos (* 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/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))))) (/ 1 (pow y-scale 2)))))
#s(approx (/ (pow (cos (* 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/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2)))))))))) (/ 1 (pow y-scale 2)))))
#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 (/ (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(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow y-scale 4))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (/ (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(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 4))) (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4)))))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (/ (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(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 4))) (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (+ (* (pow angle 2) (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4))))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))))))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (pow a 4)))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))))) (pow a 4))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2))))) (pow a 4))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 2 (* (pow a 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) (+ (* 2 (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow a 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 (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)))))) (pow a 4))))
#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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (* (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))))))) #s(hole binary64 (* -1 (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 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))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 4)))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (/ (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(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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (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 (* 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (cos (* 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) (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (pow y-scale 2))) (pow b 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (/ (* (pow a 4) (pow x-scale 2)) (pow y-scale 4)))) (pow b 4)) (pow x-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (pow b 2)) (pow x-scale 2))))
#s(approx (pow x-scale 2) #s(hole binary64 (pow x-scale 2)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) #s(hole binary64 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) #s(hole binary64 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (* (pow y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow a 4) (pow y-scale 4)) (/ (pow b 4) (pow x-scale 4))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (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 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* 1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) #s(hole binary64 (* -1 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) #s(hole binary64 (* -1 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (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 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (sin (* 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) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (pow x-scale 2))) (pow a 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (/ (* (pow b 4) (pow y-scale 2)) (pow x-scale 4)))) (pow a 4)) (pow y-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) #s(hole binary64 (/ 2 (pow y-scale 2))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (sqrt (* 16 (/ (pow b 4) (pow x-scale 2)))))) (pow b 2))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (sqrt (* 16 (/ (pow b 4) (pow x-scale 2))))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 16 (/ (pow b 4) (pow x-scale 2)))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (sqrt (* 16 (/ (pow b 4) (pow x-scale 2))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (sqrt (* 16 (/ (pow b 4) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) #s(hole binary64 (* 16 (/ (pow b 4) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) #s(hole binary64 (* 2 (/ (pow b 4) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) #s(hole binary64 (* 2 (/ (pow b 4) (pow y-scale 2)))))
#s(approx (pow y-scale 4) #s(hole binary64 (pow y-scale 4)))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (* -1 (/ (sqrt (* 8 (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (pow y-scale 2))))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (/ (sqrt (* 8 (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (pow y-scale 2)))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (/ (sqrt (* 8 (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))))

Calls

15 calls:

Time	Variable		Point	Expression
96.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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 b 2) x-scale) (pow b 2) (/ (/ (+ (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)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (pow b 2) (pow x-scale 2)) (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))) (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/ 2 (pow y-scale 2)) (pow y-scale 2) (* (* x-scale x-scale) (* y-scale y-scale)) (* b b) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 4)) 1 (pow y-scale 4) (/ 1 (pow y-scale 2)) (* (pow x-scale 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))) (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (pow (cos (* 1/180 (* angle (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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 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 (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))))
74.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 b 2) x-scale) (pow b 2) (/ (/ (+ (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)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (pow b 2) (pow x-scale 2)) (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))) (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/ 2 (pow y-scale 2)) (pow y-scale 2) (* (* x-scale x-scale) (* y-scale y-scale)) (* b b) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 4)) 1 (pow y-scale 4) (/ 1 (pow y-scale 2)) (* (pow x-scale 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))) (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (pow (cos (* 1/180 (* angle (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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 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 (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))))
60.0ms	b	@	-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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 b 2) x-scale) (pow b 2) (/ (/ (+ (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)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (pow b 2) (pow x-scale 2)) (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))) (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/ 2 (pow y-scale 2)) (pow y-scale 2) (* (* x-scale x-scale) (* y-scale y-scale)) (* b b) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 4)) 1 (pow y-scale 4) (/ 1 (pow y-scale 2)) (* (pow x-scale 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))) (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (pow (cos (* 1/180 (* angle (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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 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 (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))))
53.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 b 2) x-scale) (pow b 2) (/ (/ (+ (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)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (pow b 2) (pow x-scale 2)) (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))) (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/ 2 (pow y-scale 2)) (pow y-scale 2) (* (* x-scale x-scale) (* y-scale y-scale)) (* b b) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 4)) 1 (pow y-scale 4) (/ 1 (pow y-scale 2)) (* (pow x-scale 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))) (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (pow (cos (* 1/180 (* angle (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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 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 (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))))
51.0ms	b	@	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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 b 2) x-scale) (pow b 2) (/ (/ (+ (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)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (pow b 2) (pow x-scale 2)) (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))) (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/ 2 (pow y-scale 2)) (pow y-scale 2) (* (* x-scale x-scale) (* y-scale y-scale)) (* b b) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ 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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 4)) 1 (pow y-scale 4) (/ 1 (pow y-scale 2)) (* (pow x-scale 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))) (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (pow (cos (* 1/180 (* angle (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))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 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 (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))))

rewrite2.0s (5.6%)

Memory

-131.5MiB live, 1 339.3MiB allocated; 1.5s collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	5673	414587
0	5868	387885
0	8588	381078

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

1 022 → 1 126

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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-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))))
(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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #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 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(+.f64 (/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale)
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))
(/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)
(pow.f64 b #s(literal 2 binary64))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
angle
#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))))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
(pow.f64 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
(/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))
(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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b)))
#s(literal -1/4 binary64)
(/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))
(.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(*.f64 x-scale x-scale)
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(*.f64 y-scale y-scale)
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
#s(literal 8 binary64)
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64))))))
(pow.f64 b #s(literal 4 binary64))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))
(pow.f64 y-scale #s(literal 2 binary64))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))))
(.f64 #s(literal 1/4 binary64) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))
#s(literal 1/4 binary64)
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))
(/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))
(.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
(.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
(.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
(.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))
(+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))
#s(literal 1 binary64)
(pow.f64 y-scale #s(literal 4 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))
(*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))))) (.f64 b b))))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))))) (.f64 b b)))
(/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))))) (.f64 b b))
(.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))))
(.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))
(.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale))
#s(literal -1 binary64)
(/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))
(.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.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 (/.f64 (pow.f64 (cos.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 (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 (pow.f64 (cos.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 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
(/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))
(pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
(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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
(.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
(+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
(sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
(/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))
(pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))
(fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(pow.f64 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)))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (/ (* (pow a 2) (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow b 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow b 2) (sqrt (* 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 b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow a 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 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))))))) (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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)))))))))))))))
#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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow b 4) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (pow y-scale 4)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (pow b 2))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* 1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow a 2) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (/ (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(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (/ (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(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (/ (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(hole binary64 (+ (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#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 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 4) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow a 4) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow y-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow a 4) (pow x-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (* (pow a 2) (pow x-scale 2))) (/ 1 (pow y-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (/ (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(hole binary64 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (/ (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(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (/ (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(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow a 2))) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow a 4)) (pow (cos (* 1/180 (* angle (PI)))) 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))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow b 2))) (/ (* (pow b 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow a 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow b 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow a 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))) (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 4) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))) (* 4 (/ (* (pow b 4) (* (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (* 16 (/ (* (pow b 8) (pow (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 6) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow b 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow a 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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 a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))))) (* (pow a 2) (sqrt (* 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)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (sqrt (* 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 a 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 2) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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))))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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))))))))))) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (* 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) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (sqrt (* 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) (+ (* 1/2 (/ (* (pow b 2) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2))))))) (sqrt (* 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))))))) (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (sqrt (* 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 (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))))
#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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 2) x-scale) #s(hole binary64 (/ (pow b 2) x-scale)))
#s(approx (pow b 2) #s(hole binary64 (pow b 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 4)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 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))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (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 (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (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)))))))
#s(approx (pow b 4) #s(hole binary64 (pow b 4)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* 1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow b 2) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) #s(hole binary64 (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) #s(hole binary64 (* a (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (* -1 (/ (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (pow y-scale 2))))) x-scale))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (/ (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (pow y-scale 2))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (* (pow b 2) (sqrt (* 8 (/ (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (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(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (/ (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(hole binary64 (+ (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (+ (* 2 (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (sqrt (* 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))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 4) (* (pow x-scale 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)))))))) (+ (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (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 (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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow x-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow b 4) (pow y-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (/ 1 (pow x-scale 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (/ (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(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (/ (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(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (+ (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (sin (* 1/180 (* angle (PI)))) 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))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))) (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 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 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))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 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))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (pow a 2))) (/ (* (pow a 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* 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))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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) (- (* -4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))) (sqrt (* 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))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#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) (+ (sqrt (* 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))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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))))))))))))))))
#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) (+ (sqrt (* 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))))) (+ (* 1/2 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (* (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 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))))) 2)))))) (* (pow b 6) (sqrt (* 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)))))))) (+ (* 1/2 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow x-scale 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))))))) (* 16 (/ (* (pow a 8) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 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))))) 2)))))) (* (pow b 4) (sqrt (* 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)))))))) (* 4 (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (sqrt (* 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)))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))) (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow a 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow a 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 4) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))) (* 4 (/ (* (pow a 4) (* (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (* 16 (/ (* (pow a 8) (pow (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 6) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))) (/ (pow a 2) (pow y-scale 2)))) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow angle 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow a 2) (pow b 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/8 (/ (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (/ (* (pow a 2) (* (pow b 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (* -1 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* -4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 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))))))) #s(hole binary64 (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 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 (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow a 4) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 4 (/ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) 2))) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+ (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))) (* (pow x-scale 2) (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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) (/ (/ (+ (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 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 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 (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 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 (+ (* -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 (* -1/64800 (* a (* (pow angle 2) (pow (PI) 2)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* 1/25194240000 (* a (* (pow angle 2) (pow (PI) 4)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* a (* (pow angle 2) (pow (PI) 6)))) (* 1/25194240000 (* a (pow (PI) 4))))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 1))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))))
#s(approx (* (/ angle 180) (PI)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (/ angle 180) #s(hole binary64 (* 1/180 angle)))
#s(approx angle #s(hole binary64 angle))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* angle (* b (PI))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (pow (PI) 3)))) (* 1/180 (* b (PI)))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* 1/22674816000000 (* (pow angle 2) (* b (pow (PI) 5))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (pow (PI) 7)))) (* 1/22674816000000 (* b (pow (PI) 5)))))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 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))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 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 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (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 (- (/ (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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))) (* (pow angle 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* -1/8 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -2 (/ (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 2 (* (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (/ (* (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -2 (/ (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* -2 (/ (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))) (sqrt (/ 1 (pow y-scale 4))))))))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (+ (* -4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (+ (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) (* (pow angle 2) (+ (* -4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (+ (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) (* (pow angle 2) (+ (* -4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* -1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (+ (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))) (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))))) (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* x-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))) (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* 8 (/ (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))) (* 16 (/ (* (pow b 8) (pow (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow y-scale 2))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))) (* (pow angle 2) (+ (* 8 (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow y-scale 2))) (* (pow angle 2) (+ (* 8 (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))) (* (pow b 4) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4)))))))))) (* (pow b 4) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))))))))) (/ 1 (pow y-scale 2))))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (sqrt (/ 1 (pow y-scale 4)))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* 1/2 (/ (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (+ (sqrt (/ 1 (pow y-scale 4))) (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (* (pow y-scale 4) (sqrt (/ 1 (pow y-scale 4)))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4))))) (* -1/32400 (/ (* (pow (PI) 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (sqrt (/ 1 (pow y-scale 4))))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))))) (* 1/1049760000 (/ (pow (PI) 4) (* (pow y-scale 8) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) #s(hole binary64 (/ 1 (pow y-scale 4))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) #s(hole binary64 (+ (* -1/16200 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 4))) (/ 1 (pow y-scale 4)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow y-scale 4))) (* (pow angle 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4)))))))) (/ 1 (pow y-scale 4)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow y-scale 4))) (* (pow angle 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 4))) (+ (* 1/1049760000 (/ (pow (PI) 4) (pow y-scale 4))) (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 4))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 4))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 4)))))))))))) (/ 1 (pow y-scale 4)))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))))))))))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (/ 1 (pow y-scale 2))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2))) (/ 1 (pow y-scale 2)))))
#s(approx (/ (pow (cos (* 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/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))))))) (/ 1 (pow y-scale 2)))))
#s(approx (/ (pow (cos (* 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/12597120000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow y-scale 2)))))))))) (/ 1 (pow y-scale 2)))))
#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 (/ (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(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow y-scale 4))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (/ (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(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 4))) (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4)))))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (/ (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(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 4))) (* (pow angle 2) (+ (* 2 (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (+ (* (pow angle 2) (+ (* 2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow y-scale 4))))) (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2) (pow y-scale 4))))))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (pow a 4)))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))))) (pow a 4))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2))))) (pow a 4))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 2 (* (pow a 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) (+ (* 2 (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow a 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 (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) 2)))))) (pow a 4))))
#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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ 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 (/ (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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))))))) (* (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))))))) #s(hole binary64 (* -1 (sqrt (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 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)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 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))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (sqrt (* 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 4)))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (/ (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(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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (cos (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow y-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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) (+ (sqrt (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 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)))) (sqrt (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 (cos (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow y-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow y-scale 2) (sqrt (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 (* 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (cos (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (cos (* 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) (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (pow y-scale 2))) (pow b 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (/ (* (pow a 4) (pow x-scale 2)) (pow y-scale 4)))) (pow b 4)) (pow x-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (pow b 2)) (pow x-scale 2))))
#s(approx (pow x-scale 2) #s(hole binary64 (pow x-scale 2)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))) (* (pow x-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))))) (pow x-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 4) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (pow y-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow y-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (/ (pow a 2) (pow y-scale 2))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2)))))))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow b 4)) (pow b 2)))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) #s(hole binary64 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) #s(hole binary64 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 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 (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (* (pow y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow a 4) (pow y-scale 4)) (/ (pow b 4) (pow x-scale 4))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (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 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))) (* (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 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (* (pow y-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 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 y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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)))))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* 1/4 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (* -1/8 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (/ (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* a (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) x-scale))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))))))))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) 2))))) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))))))))))) x-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/4 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) 2))) (* (pow y-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))))) (* (pow y-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow x-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))))) (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (/ (pow a 2) (pow y-scale 2))))) (pow y-scale 2))))) (* (pow a 2) (pow b 2))))))))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) #s(hole binary64 (* -1 (/ (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))) (pow b 2)))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) #s(hole binary64 (* -1 (* a (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2))))))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* x-scale (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (pow y-scale 2)))))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (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 (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 (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* -4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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))))))) #s(hole binary64 (/ (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (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)))) (sqrt (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 (sin (* 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) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))))) (* 1/2 (/ (- (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (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 (sin (* 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 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (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 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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) (+ (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (pow x-scale 2) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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) (+ (sqrt (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 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)))) (sqrt (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 (sin (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))))) (* (pow x-scale 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (pow x-scale 2) (sqrt (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 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 (/ (+ (sqrt (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 (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 (sin (* 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 (/ (+ (sqrt (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) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 (sin (* 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) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (sqrt (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 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 (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 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))))) (sqrt (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 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 (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (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 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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (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 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (pow x-scale 2))) (pow a 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (/ (* (pow b 4) (pow y-scale 2)) (pow x-scale 4)))) (pow a 4)) (pow y-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))) (* (pow y-scale 2) (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 2) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow b 2)))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* 4 (/ (* a (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (+ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))))))) (pow y-scale 2))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2))))) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 4 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow y-scale 4))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) #s(hole binary64 (/ 2 (pow y-scale 2))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (+ (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2))))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2)))))))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow a 4)) (pow a 2)))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (sqrt (* 16 (/ (pow b 4) (pow x-scale 2)))))) (pow b 2))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (sqrt (* 16 (/ (pow b 4) (pow x-scale 2))))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) #s(hole binary64 (* (pow x-scale 2) (sqrt (* 16 (/ (pow b 4) (pow x-scale 2)))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (sqrt (* 16 (/ (pow b 4) (pow x-scale 2))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (sqrt (* 16 (/ (pow b 4) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) #s(hole binary64 (* 16 (/ (pow b 4) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) #s(hole binary64 (* 2 (/ (pow b 4) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) #s(hole binary64 (* 2 (/ (pow b 4) (pow y-scale 2)))))
#s(approx (pow y-scale 4) #s(hole binary64 (pow y-scale 4)))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) #s(hole binary64 (* -1 (/ (sqrt (* 8 (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (pow y-scale 2))))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) #s(hole binary64 (/ (sqrt (* 8 (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (pow y-scale 2)))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) #s(hole binary64 (/ (sqrt (* 8 (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 4))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) #s(hole binary64 (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (* (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) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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))))))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (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 (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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/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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))) (* 8 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))) (+ (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (/ (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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* 1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (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 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))) (* (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 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (* (pow x-scale 2) (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))))))) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (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 (/ (+ (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))) (* 4 (/ (* (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 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)))))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* 1/4 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* -1/4 (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))) (+ (* -1/8 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (* -1/8 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (pow b 2)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))) (+ (* 4 (/ (* a (* (pow b 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (/ (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))) (pow b 2)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* a (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* a (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* a (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* a (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2)))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))))))))) y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) #s(hole binary64 (* -1 (/ (+ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) (+ (* 1/2 (/ (- (* -2 (/ (* (pow b 4) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow b 4) (* (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (+ (* 1/2 (/ (- (* 4 (/ (* (pow b 4) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 16 (/ (* (pow b 8) (pow (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) 2)) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))) (* 4 (/ (* (pow b 4) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow x-scale 2))))))))))) y-scale))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1/4 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/4 (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))) (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (/ (* (pow x-scale 2) (* y-scale (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))))) (* (pow a 2) (pow b 2))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 4) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 4 (/ (* (pow a 6) (* (pow b 6) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) (- (* 4 (/ (* (pow a 4) (* (pow b 4) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* 16 (/ (* (pow a 8) (* (pow b 8) (pow (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)) 2))) (* (pow x-scale 4) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))))) (* (pow x-scale 2) (pow (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2)))) 2)))))) (* (pow a 2) (* (pow b 2) (* (pow y-scale 6) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))))) (+ (* 4 (/ (* (pow a 2) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (pow a 2)))) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))))) (/ (* (pow x-scale 2) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (pow x-scale 2))))) (* (pow a 2) (pow b 2))))))))))

Outputs
(/.f64 (neg.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))))) (neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))))
(.f64 (sqrt.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))))
(pow.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))))
(.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
#s(literal 2 binary64)
(/.f64 (neg.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a))))) (neg.f64 (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.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 (/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))
(+.f64 (/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (neg.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (*.f64 b b) x-scale))) (neg.f64 x-scale))
(/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (*.f64 b b) 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))
(/.f64 (neg.f64 (*.f64 b b)) (neg.f64 x-scale))
(/.f64 (*.f64 b b) x-scale)
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (neg.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 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)
(fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(fma.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (.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 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(.f64 (.f64 a a) (pow.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))
(.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))))
(pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.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))))
(sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 (neg.f64 angle) #s(literal -180 binary64))
(/.f64 angle #s(literal 180 binary64))
angle
#s(literal 180 binary64)
(PI.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 (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))))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(pow.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.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 #s(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
(.f64 #s(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(pow.f64 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 #s(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) #s(literal 2 binary64)))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
(/.f64 (neg.f64 (.f64 b b)) (neg.f64 (.f64 x-scale x-scale)))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(*.f64 (fabs.f64 x-scale) (fabs.f64 x-scale))
(*.f64 (neg.f64 x-scale) (neg.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 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b)))
#s(literal -1/4 binary64)
(/.f64 (neg.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (neg.f64 (*.f64 b b)))
(/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))
(.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
(*.f64 (fabs.f64 x-scale) (fabs.f64 x-scale))
(*.f64 (neg.f64 x-scale) (neg.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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
(*.f64 (fabs.f64 y-scale) (fabs.f64 y-scale))
(*.f64 (neg.f64 y-scale) (neg.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 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
(pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
(.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
#s(literal 8 binary64)
(/.f64 (neg.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale)))))) (neg.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (*.f64 y-scale y-scale)))))
(pow.f64 b #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 4 binary64)))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (*.f64 y-scale y-scale))))
#s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (*.f64 y-scale y-scale)))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 #s(literal 2 binary64) (*.f64 y-scale y-scale))
(*.f64 (fabs.f64 y-scale) (fabs.f64 y-scale))
(*.f64 (neg.f64 y-scale) (neg.f64 y-scale))
(*.f64 y-scale y-scale)
(pow.f64 y-scale #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))
(.f64 (.f64 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 (fabs.f64 b) (fabs.f64 b))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b)))))
(.f64 #s(literal 1/4 binary64) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
#s(literal 1/4 binary64)
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b)))
(/.f64 (neg.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (neg.f64 (.f64 b b)))
(/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))
(.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
(.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
(.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
(pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.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 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
(/.f64 (neg.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (neg.f64 (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))
(+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 binary64))))
(sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))
(pow.f64 (pow.f64 y-scale #s(literal 4 binary64)) #s(literal -1 binary64))
(pow.f64 y-scale #s(literal -4 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 y-scale #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))
#s(literal 1 binary64)
(pow.f64 y-scale #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 y-scale) #s(literal 4 binary64)))
(pow.f64 (*.f64 y-scale y-scale) #s(literal -1 binary64))
(pow.f64 y-scale #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))
(.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)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) x-scale)))))) (.f64 b b))))
(.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) x-scale)))))) (.f64 b b)))
(/.f64 (neg.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) x-scale))))))) (neg.f64 (.f64 b b)))
(/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) x-scale)))))) (.f64 b b))
(.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))) x-scale))))))
(.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))) x-scale)))))
(.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))) x-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))) x-scale)))
(.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))) x-scale))
#s(literal -1 binary64)
(/.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) (neg.f64 x-scale))
(/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) x-scale)
(.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))
(pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))
(.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))
(/.f64 (neg.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))
(+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))
(pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 y-scale #s(literal 4 binary64))))
(sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
(/.f64 (neg.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (neg.f64 (pow.f64 y-scale #s(literal 4 binary64))))
(/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))
(exp.f64 (.f64 (log.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (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 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
(/.f64 (neg.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(.f64 (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))
(exp.f64 (.f64 (log.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(/.f64 (neg.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (neg.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
(.f64 (sqrt.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
(pow.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) #s(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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
(.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
(+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
(pow.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
(/.f64 (neg.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (pow.f64 y-scale #s(literal 4 binary64))))
(/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))))
(pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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)))
(.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 a a) (.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.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 (.f64 a a) (.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal 8 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal 8 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-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)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (.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))) (.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
#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)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
#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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (fma.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) x-scale) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) x-scale)))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) y-scale)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 a a) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b)))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.f64 b b))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.f64 b b))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.f64 b b))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (.f64 a a) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b)))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
#s(approx (/ (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)) (/.f64 (pow.f64 (.f64 b (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 (/ (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)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 b (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 (/ (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)) (fma.f64 (.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 (.f64 b (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 (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))
#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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) a) (-.f64 (.f64 #s(literal -4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.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)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.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 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 a a) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 a a)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 y-scale #s(literal -4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 a x-scale) #s(literal 4 binary64)))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.f64 b b)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.f64 b b))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)))))))
#s(approx (/ (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)) (/.f64 (pow.f64 (.f64 a (cos.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 (/ (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)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.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 (/ (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)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (.f64 a y-scale) #s(literal 4 binary64))) (/.f64 (pow.f64 (cos.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 (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 a a)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 a a)) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (cos.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 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (-.f64 (.f64 #s(literal -4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 a a) a) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (.f64 (.f64 b b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.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 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 b b) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
#s(approx (/ (pow b 2) x-scale) (/.f64 (*.f64 b b) x-scale))
#s(approx (pow b 2) (*.f64 b b))
#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))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 b b) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* 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 (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
#s(approx (pow b 4) (pow.f64 b #s(literal 4 binary64)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.f64 a a))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (.f64 (.f64 b b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.f64 a a))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.f64 a a))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (.f64 a (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
#s(approx (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (.f64 y-scale y-scale))))) x-scale)))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (/.f64 (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (*.f64 y-scale y-scale))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (*.f64 y-scale y-scale))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))
#s(approx (/ (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)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a (cos.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 (/ (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)) (fma.f64 (.f64 b b) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (.f64 (.f64 b b) (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 (.f64 a (cos.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 (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.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) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) b) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.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 6 binary64)) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.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 6 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.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 6 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.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 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 b b)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-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) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 x-scale #s(literal -4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 b y-scale) #s(literal 4 binary64)))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 a a))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 a a)))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.f64 a a)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.f64 a a))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)))))))
#s(approx (/ (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)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (/ (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)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (.f64 b y-scale) #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 b b)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 b b)) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (sin.f64 (.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) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 binary64) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (.f64 (.f64 (.f64 b b) b) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 a a))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 a a))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.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 (-.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 (/.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 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.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 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.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 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.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 angle angle) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.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 angle angle) (-.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.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 (-.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 (/.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 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.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 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (*.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.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 (-.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 (/.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 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.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 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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/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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.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)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-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 (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 x-scale x-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 -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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.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))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 (.f64 x-scale x-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 (.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 (/.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 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.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 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 x-scale x-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 -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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (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 #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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (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)) (fma.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.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) (fma.f64 #s(literal 1/12597120000 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 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (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)) (fma.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (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 (/.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 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.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 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (.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) (fma.f64 #s(literal 1/12597120000 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 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (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 (/.f64 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (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) (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 (/.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) (fma.f64 #s(literal 1/12597120000 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 (.f64 a a) (.f64 y-scale y-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) (/ (/ (+ (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) (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 (.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 (/.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 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.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) (fma.f64 #s(literal 1/12597120000 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 (.f64 a a) (.f64 y-scale y-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) (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) (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) (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) (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 (.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 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (/.f64 (.f64 (.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) (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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) x-scale) (fma.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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) x-scale) (fma.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 (/.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))))) x-scale) (/.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))))) 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 (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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (fma.f64 (.f64 angle angle) (+.f64 (/.f64 (.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 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) y-scale) (fma.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) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) y-scale) (fma.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 (/.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))))) y-scale) (/.f64 (.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)) (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) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.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) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.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) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64)))) (.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)))) (+.f64 a (.f64 #s(literal -1/64800 binary64) (.f64 a (.f64 (.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (.f64 a (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/25194240000 binary64) (.f64 a (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (.f64 a (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (.f64 a (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 #s(literal 1/25194240000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/64800 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 1/25194240000 binary64) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
#s(approx (/ angle 180) (*.f64 #s(literal 1/180 binary64) angle))
#s(approx angle angle)
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (.f64 (.f64 angle angle) (fma.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) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (.f64 b b) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 #s(literal 1/180 binary64) (.f64 angle (*.f64 b (PI.f64)))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 angle angle) (.f64 b (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (.f64 #s(literal 1/180 binary64) (.f64 b (PI.f64))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 b (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (.f64 b (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (.f64 angle angle) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 b (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (.f64 b (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (.f64 angle angle) (.f64 b (pow.f64 (PI.f64) #s(literal 7 binary64)))) (.f64 #s(literal 1/22674816000000 binary64) (.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))
#s(approx (sin (* (/ angle 180) (PI))) (.f64 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 (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 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 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 (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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale 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 (/.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 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.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 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (pow.f64 (pow.f64 (-.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 1 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.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 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (.f64 angle angle) (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)))) (.f64 (.f64 x-scale x-scale) (.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)))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (.f64 angle angle) (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)))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.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))))) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (.f64 angle angle) (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)))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #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)))) (.f64 (.f64 x-scale x-scale) (.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 (/.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 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.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 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (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))))) (.f64 (.f64 x-scale x-scale) (.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 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (pow.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))))) #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 angle angle) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 angle angle) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.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 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.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 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))) (.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)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.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 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))) (.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)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (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)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))))))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))) x-scale)))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) x-scale))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))))))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))))))))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) x-scale))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))) x-scale)))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))) x-scale)))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))))))))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 y-scale y-scale)) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 y-scale y-scale)) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (*.f64 y-scale y-scale)))))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (+.f64 (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (fma.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (fma.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))
#s(approx (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (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/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (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/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (pow.f64 y-scale #s(literal -4 binary64)))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (.f64 angle angle) (*.f64 (PI.f64) (PI.f64))) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal -4 binary64))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal -4 binary64))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.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 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal -1/408146688000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/6122200320000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) (pow.f64 y-scale #s(literal -4 binary64))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.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))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))))
#s(approx (* angle (PI)) (*.f64 angle (PI.f64)))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (fma.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/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (fma.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/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (pow (cos (* 1/180 (* angle (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 (pow (cos (* 1/180 (* angle (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 (/ (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)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.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))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (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)) (fma.f64 (.f64 angle angle) (fma.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 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (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))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (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))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (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)) (fma.f64 (.f64 angle angle) (fma.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 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (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))))))) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (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))))) (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))))))) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (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))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (pow.f64 (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))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow.f64 a #s(literal 4 binary64)))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.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))))))) (pow.f64 a #s(literal 4 binary64))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (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 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))))) (pow.f64 a #s(literal 4 binary64))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (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 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (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))))))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 a a) (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))))))))) (pow.f64 (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))))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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))))))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.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)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))))) (.f64 (.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 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 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 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))))) (.f64 (.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 (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 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) x-scale))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) y-scale))
#s(approx (cos (* (/ angle 180) (PI))) (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (sin (* (/ angle 180) (PI))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))) x-scale)))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))
#s(approx (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (/.f64 (pow.f64 (cos.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 (pow (cos (* 1/180 (* angle (PI)))) 4) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
#s(approx (/ (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)) (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 -4 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 4 binary64) (/.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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))))))))) (.f64 x-scale x-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (* x-scale y-scale) 2) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
#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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))))) (.f64 x-scale x-scale)))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))))) (.f64 x-scale x-scale)))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))))) (.f64 x-scale x-scale)))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (pow.f64 (.f64 x-scale (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (.f64 b b)) (.f64 x-scale x-scale)))
#s(approx (pow x-scale 2) (*.f64 x-scale x-scale))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (.f64 b b))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (.f64 b b)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (*.f64 b b)))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (*.f64 b b))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (*.f64 b b))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (.f64 b b))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (.f64 x-scale x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))))))) (.f64 x-scale x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))))))) (.f64 x-scale x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #s(literal 4 binary64)) (.f64 y-scale y-scale)))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (cos.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (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 b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (cos.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (cos.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.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 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (.f64 x-scale x-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (cos.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (*.f64 b b)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale)))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (*.f64 y-scale y-scale)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))))))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (*.f64 b b)))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (*.f64 b b)))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))) (.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 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (*.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 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.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 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.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 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (*.f64 y-scale y-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 #s(literal -4 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-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 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-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 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (*.f64 y-scale y-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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (*.f64 y-scale y-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)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (*.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)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.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)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.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 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.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))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.f64 b b))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 b b))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 b b)) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 b b)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (*.f64 b b)))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (*.f64 b b)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (*.f64 b b))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 b b)))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))))))) x-scale))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))))))) x-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))))))) x-scale))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 x-scale x-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 x-scale x-scale)))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))) (.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 binary64) (.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.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 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (*.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 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (*.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 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (*.f64 y-scale y-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 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (*.f64 y-scale y-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 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (*.f64 y-scale y-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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (*.f64 y-scale y-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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale))))))))))) x-scale)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.f64 b b))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (*.f64 b b)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 b b)) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 b b)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.f64 b b))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 b b))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 b b)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (*.f64 b b))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) x-scale)))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))))))) x-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.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 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))))))))))) x-scale)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (*.f64 b b)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (*.f64 b b))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) #s(literal 2 binary64)))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b)))))))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.f64 b b))))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (.f64 #s(literal -1 binary64) (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (*.f64 y-scale y-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 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 y-scale y-scale) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))) (.f64 y-scale y-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 -4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 y-scale y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 y-scale y-scale)))
#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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))
#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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))))) (*.f64 y-scale y-scale)))
#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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))))))) (*.f64 y-scale y-scale)))
#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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))))))))) (.f64 y-scale y-scale)))
#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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.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)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.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 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx 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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (.f64 y-scale y-scale)))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))))) (.f64 y-scale y-scale)))
#s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))))) (.f64 y-scale y-scale)))
#s(approx (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #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 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (pow.f64 (.f64 y-scale (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 x-scale x-scale)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 x-scale x-scale)) (.f64 a a)) (.f64 y-scale y-scale)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (.f64 b b))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (.f64 b b)))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (*.f64 b b)))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (*.f64 b b))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (*.f64 b b))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (.f64 b b))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (fma.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))))))))))))
#s(approx (* y-scale y-scale) (*.f64 y-scale y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (.f64 y-scale y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))))))) (.f64 y-scale y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))))))))) (.f64 y-scale y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.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 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 y-scale y-scale)))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (.f64 y-scale y-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))
#s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (*.f64 y-scale y-scale)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (*.f64 b b)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale)))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (.f64 (.f64 y-scale y-scale) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (*.f64 x-scale x-scale)))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (*.f64 b b)))))
#s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-scale)))))) (.f64 b b)))
#s(approx (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))))
#s(approx (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-scale))))))
#s(approx (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-scale)))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (.f64 #s(literal 16 binary64) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 y-scale y-scale))))
#s(approx (pow y-scale 4) (pow.f64 y-scale #s(literal 4 binary64)))
#s(approx (* -1 (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (*.f64 y-scale y-scale)))))
#s(approx (/ (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) x-scale) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 y-scale y-scale))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow y-scale 2)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (/.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))) (.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 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-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 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-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 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-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))))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (*.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 #s(literal -4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.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 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.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 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (*.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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (*.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 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (*.f64 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 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 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 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (*.f64 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 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.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))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (.f64 b b))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 b b))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 b b)) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 b b)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale)))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (*.f64 b b)))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (*.f64 b b)))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (*.f64 b b))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 b b)))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale)))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale)))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))))))) y-scale))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))))))) y-scale))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 y-scale y-scale)))
#s(approx (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 3/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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 y-scale y-scale)))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)))
#s(approx (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))
#s(approx (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 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 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 b b))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.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 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))) (.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 binary64) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-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 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-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 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-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))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (*.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 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (*.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 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (*.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (*.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 x-scale x-scale))))))))))) y-scale)))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (.f64 b b))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (*.f64 b b)))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 b b)) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale)))))))))))))
#s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 b b)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))))))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (.f64 b b))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 b b))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 b b)))))))
#s(approx (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (*.f64 b b))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale)))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))))))))
#s(approx (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale))))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale))))))))))
#s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale)))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))))))))))
#s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))))))))))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale)))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale)))))))))) y-scale)))
#s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (/.f64 (pow.f64 (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(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (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(literal 1 binary64)))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (*.f64 x-scale x-scale))))))))))) y-scale)))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (*.f64 x-scale x-scale))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)))))))))))
#s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (*.f64 b b)))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (*.f64 b b))))))))
#s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 16 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 8 binary64)) (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)) #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))) #s(literal 1 binary64))))))))) (pow.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b)))))))))

eval2.3s (6.5%)

Memory: 81.1MiB live, 3 124.0MiB allocated; 486ms collecting garbage
Compiler: Compiled 242 967 to 11 874 computations (95.1% saved)

prune1.1s (3.1%)

Memory

-28.2MiB live, 1 930.1MiB allocated; 176ms collecting garbage

Pruning

71 alts after pruning (70 fresh and 1 done)

	Pruned	Kept	Total
New	1 193	36	1 229
Fresh	36	34	70
Picked	5	0	5
Done	0	1	1
Total	1 234	71	1 305

Accuracy

26.1%

Counts

1 305 → 71

Alt Table

Click to see full alt table

Status	Accuracy	Program
	1.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 #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))) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.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.7%	(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 y-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))))
	2.8%	(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 #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.7%	(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 #s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (.f64 a a) y-scale)) y-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-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))))
	4.0%	(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-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))))
	6.6%	(/.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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.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))))
	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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.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))))
	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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
	3.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)))) (exp.f64 (.f64 (log.f64 (.f64 x-scale y-scale)) #s(literal 2 binary64))))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (exp.f64 (.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
	0.7%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) #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))))))
	0.4%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 #s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
	0.4%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 #s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
	0.7%	(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 #s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
	1.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 a a) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) 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.2%	(/.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 a a) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-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))))
	0.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 a a) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-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))))
	1.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b)))))
✓	1.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
	0.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 #s(approx (pow (/ (+ (pow ( a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b)))))
	1.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 #s(approx ( (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 x-scale (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 a a) (.f64 b b)))))
	1.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 (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (.f64 (.f64 a a) (.f64 b b)))))
	0.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 (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
	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 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (.f64 (.f64 a a) (.f64 b b)))))
	1.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) x-scale))))) (*.f64 a a))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) x-scale)))))) (.f64 a a))))
	4.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))) (.f64 a a))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))) (*.f64 a a))))
	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 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 a a))))
	1.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 a a))))
	3.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 b #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.f64 a a))))
	1.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 b #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 a a))))
	2.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 b #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 a a))))
	1.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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))))))
	0.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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)))))
	0.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 b b))))))
	0.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))))))
	1.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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b))))))
	1.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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 a a)))))
	1.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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a #s(approx ( (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 2 binary64))))))
	4.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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-scale)))))) (.f64 b b))))))
	4.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (*.f64 b b))))))
	3.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))
	0.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.f64 b b)))))))
	3.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) #s(approx (/ ( x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #s(literal 2 binary64))))))
	2.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (/ ( x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))
	4.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) #s(approx (/ ( b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 4 binary64))) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 b b))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)))))) (*.f64 b b))))
	1.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))))) (.f64 b b))))
	1.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))))) (.f64 b b))))
	0.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))))
	0.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))) (.f64 b b))))
	0.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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (*.f64 b b))))))
	0.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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (*.f64 b b)))))))
	0.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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (*.f64 b b)))))))
	0.2%	#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
	1.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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.f64 b b))))))))
	2.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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 b b))))))))
	0.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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))))))))
	0.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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (*.f64 b b))))))
	0.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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 a a)))))
	0.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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))
	1.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))) #s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
	2.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(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))

Compiler

Compiled 14 705 to 8 001 computations (45.6% saved)

regimes1.0s (2.9%)

Memory

39.2MiB live, 1 531.1MiB allocated; 183ms collecting garbage

Accuracy

Total -2.5b remaining (-0.9%)

Threshold costs -2.5b (-0.9%)

Counts

3 → 1

32 → 2

48 → 2

57 → 2

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

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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (*.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 b b))))))

Call 2

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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (*.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 4 binary64))) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a #s(approx ( (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 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))) #s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) #s(approx ( (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 #s(approx ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 #s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(/.f64 (neg.f64 (sqrt.f64 #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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))

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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (*.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))) (*.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) #s(approx (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (*.f64 a (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))))))) (*.f64 b b))))))

Call 3

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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (*.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 4 binary64))) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a #s(approx ( (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 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))) #s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) #s(approx ( (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 #s(approx ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 #s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(/.f64 (neg.f64 (sqrt.f64 #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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))) (.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))))) (.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ ( (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale)))))) (.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))) #s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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))) (.f64 #s(literal 1/4 binary64) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale))))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)))))) (*.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 b b))))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ ( (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))))

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

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)))) #s(approx (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.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))))

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

Call 4

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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (*.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 4 binary64))) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a #s(approx ( (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 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))) #s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) #s(approx ( (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 #s(approx ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 #s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(/.f64 (neg.f64 (sqrt.f64 #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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))) (.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))))) (.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ ( (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale)))))) (.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))) #s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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))) (.f64 #s(literal 1/4 binary64) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale))))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)))))) (*.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 b b))))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ ( (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 #s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (.f64 a a) y-scale)) y-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 #s(approx ( (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 #s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (.f64 b b))))

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 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 #s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-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))))

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

Call 5

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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (*.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) #s(approx (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale))))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 4 binary64))) #s(approx (+ (sqrt (+ ( 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(approx (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2))) (/.f64 #s(literal 2 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a #s(approx ( (pow x-scale 2) (* (pow y-scale 2) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (/ 1 (pow y-scale 4))) (/ 1 (pow y-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #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(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 a a)))) (.f64 x-scale x-scale))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.f64 y-scale y-scale))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 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))) #s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.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) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) #s(approx ( (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 #s(approx ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 #s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(/.f64 (neg.f64 (sqrt.f64 #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 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))))) (.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))))) (.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ ( (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 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 (.f64 x-scale x-scale) #s(approx ( (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale)))))) (.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))) #s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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))) (.f64 #s(literal 1/4 binary64) #s(approx (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 b #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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #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))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) #s(approx (sqrt ( 8 (/ (* (pow b 4) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale))))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)))))) (*.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 b b))))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) #s(approx (/ ( (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt ( 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (*.f64 b b)))))
(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 #s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (.f64 a a) y-scale)) y-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))))) (.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 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 #s(approx ( (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (*.f64 b b))))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 #s(approx (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (/ ( (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b))) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.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 a (.f64 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64))))))))) (.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (*.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 (.f64 x-scale x-scale) #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (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 x-scale #s(literal 2 binary64)))))))))) (*.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))) #s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (.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 b (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) x-scale))))) (*.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale))))) (*.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 #s(approx ( (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (.f64 y-scale y-scale)))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))) x-scale)))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) x-scale)))))) (.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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (.f64 b b))))
(/.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 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 #s(approx (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 (.f64 a a) (.f64 b b)))))
(/.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 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))) #s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (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))) (.f64 #s(literal 1/4 binary64) #s(approx (/ ( x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 b (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))) (pow.f64 a #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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 #s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) y-scale) y-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 (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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a #s(approx (cos ( (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 #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) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.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 x-scale) (.f64 y-scale y-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 #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) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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 #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) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) #s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)))) (/.f64 (+.f64 (sqrt.f64 (.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 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) #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))))))
(/.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)))))) #s(approx (* (* a a) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))) (/.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(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 y-scale y-scale) #s(approx (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 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) #s(approx (/ ( x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))))) (pow.f64 b #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 (/ ( x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b))) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 y-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 #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) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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))))) 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 #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) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-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 #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) #s(approx (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (.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))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 x-scale #s(literal 2 binary64))))) y-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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 #s(approx (pow (/ (+ (pow ( a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (.f64 b b)))))
(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 a a)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-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 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale))))) (.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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b)))))
(/.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 #s(approx (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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 (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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 #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(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.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 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.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 x-scale (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-scale)))))) (.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 (.f64 x-scale x-scale) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (*.f64 b b)))))
(/.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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 y-scale y-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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (.f64 y-scale y-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 #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 (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale)))) y-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)))) #s(approx (+ (+ (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 #s(approx (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (.f64 (.f64 a a) (.f64 b b)))))
(/.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (.f64 b b) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 a (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(/.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 #s(approx (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.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(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (*.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))) #s(approx (* 1/4 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
(/.f64 (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)))) (exp.f64 (.f64 (log.f64 (.f64 x-scale y-scale)) #s(literal 2 binary64))))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 #s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (exp.f64 (.f64 (log.f64 (*.f64 x-scale 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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 a a))))
(/.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 #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))) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.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(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.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 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b))))
(/.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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-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 #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) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.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(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 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 (/ (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+ (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale)))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (* (* a a) (* b b)))) (.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.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) #s(approx (/ ( b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a)) (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.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))))) (*.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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))) (*.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 a #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))))
(/.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)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (hypot.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (*.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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (*.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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 a (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 x-scale x-scale)))))) (.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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (/.f64 (.f64 a (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)))))) (.f64 b b))))))))
(/.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))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.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))) #s(approx (* 1/4 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.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 (.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 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 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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))) #s(approx (* 1/4 (/ (* b (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 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 (/ (* x-scale (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (sqrt (pow (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale)) 2)) (/ (+ (pow (* a (cos (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (* 1/180 (* angle (PI))))) 2)) (* y-scale y-scale))))) (* y-scale y-scale)))))) (* (* a a) (* b b)))) (.f64 #s(literal -1 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (.f64 x-scale (+.f64 (/.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 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 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))) #s(approx (* -1/4 (/ (* a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (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 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal -1/4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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))))))) (pow.f64 b #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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (.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 #s(approx (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow a 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (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 (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)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.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 (.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 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) #s(approx (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (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 (cos.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 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 b #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 (/ ( a (* (* x-scale x-scale) (* (* y-scale y-scale) (sqrt (* 8 (/ (* (pow b 4) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (* (* x-scale x-scale) (* y-scale y-scale)))))))) (* b b)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #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)) (pow.f64 (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 (pow.f64 (cos.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 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (.f64 a (.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #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 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 b b))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 binary64) (.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale x-scale) (*.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 binary64) (.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 a a)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (*.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))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 b b)) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (sqrt.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))

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

Calls

26 calls:

83.0ms	a
72.0ms	(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
70.0ms	x-scale
54.0ms	(/.f64 angle #s(literal 180 binary64))
46.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))))

Results

Accuracy	Segments	Branch
4.1%	1	`a`
4.1%	1	`(/.f64 angle #s(literal 180 binary64))`
4.1%	1	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
4.1%	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))))
4.1%	1	`angle`
4.1%	1	`y-scale`
4.1%	1	`b`
4.1%	1	`x-scale`
4.6%	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))))
4.6%	1	`y-scale`
4.6%	1	`(/.f64 angle #s(literal 180 binary64))`
4.6%	1	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
4.6%	1	`angle`
6.9%	2	`b`
4.6%	1	`a`
7.8%	2	`x-scale`
9.4%	2	`x-scale`
9.5%	2	`x-scale`
8.4%	2	`(/.f64 angle #s(literal 180 binary64))`
8.4%	2	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
6.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))))
10.9%	3	`a`
11.9%	4	`b`
8.4%	2	`angle`
13.3%	4	`x-scale`
6.7%	1	`y-scale`

Compiler

Compiled 15 507 to 2 182 computations (85.9% saved)

bsearch184.0ms (0.5%)

Memory

2.8MiB live, 188.6MiB allocated; 28ms collecting garbage

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
33.0ms	2.6713141047012785e+149	8.522366515349847e+149
87.0ms	3.751215760464698e+21	2.321247607625977e+24
43.0ms	3.3891885841480614e-156	6.229772486290175e-154

Samples

120.0ms

320×

valid

Compiler

Compiled 7 968 to 4 518 computations (43.3% saved)

Precisions

Click to see histograms. Total time spent on operations: 108.0ms

ival-mult!: 38.0ms (35.2% of total)

ival-pow2: 28.0ms (25.9% of total)

ival-div!: 10.0ms (9.3% of total)

ival-sinu: 9.0ms (8.3% of total)

ival-cosu: 7.0ms (6.5% of total)

ival-add!: 7.0ms (6.5% of total)

ival-sqrt: 4.0ms (3.7% of total)

ival-neg: 3.0ms (2.8% of total)

ival-sub!: 1.0ms (0.9% of total)

adjust: 0.0ms (0% of total)

bsearch16.0ms (0%)

Memory

14.2MiB live, 14.2MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
13.0ms	2.6713141047012785e+149	8.522366515349847e+149

Samples

9.0ms

32×

valid

Compiler

Compiled 1 891 to 1 060 computations (43.9% saved)

Precisions

Click to see histograms. Total time spent on operations: 8.0ms

ival-mult!: 2.0ms (24.6% of total)

ival-pow2: 2.0ms (24.6% of total)

ival-cosu: 1.0ms (12.3% of total)

ival-sinu: 1.0ms (12.3% of total)

ival-div!: 1.0ms (12.3% of total)

adjust: 0.0ms (0% of total)

ival-sub!: 0.0ms (0% of total)

ival-sqrt: 0.0ms (0% of total)

ival-add!: 0.0ms (0% of total)

ival-neg: 0.0ms (0% of total)

bsearch36.0ms (0.1%)

Memory

-40.5MiB live, 4.6MiB allocated; 11ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
34.0ms	2.6713141047012785e+149	8.522366515349847e+149

Compiler

Compiled 1 886 to 1 020 computations (45.9% saved)

bsearch91.0ms (0.3%)

Memory

18.1MiB live, 63.5MiB allocated; 3ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
83.0ms	2.7999171952382924e+144	2.6713141047012785e+149

Samples

74.0ms

144×

valid

Compiler

Compiled 3 714 to 2 175 computations (41.4% saved)

Precisions

Click to see histograms. Total time spent on operations: 68.0ms

ival-add!: 34.0ms (49.8% of total)

ival-pow2: 11.0ms (16.1% of total)

ival-mult!: 9.0ms (13.2% of total)

ival-div!: 5.0ms (7.3% of total)

ival-sinu: 4.0ms (5.9% of total)

ival-cosu: 3.0ms (4.4% of total)

ival-sqrt: 2.0ms (2.9% of total)

ival-sub!: 1.0ms (1.5% of total)

ival-neg: 1.0ms (1.5% of total)

adjust: 0.0ms (0% of total)

derivations300.0ms (0.8%)

Memory

-18.8MiB live, 195.9MiB allocated; 88ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 733 to 250 computations (65.9% saved)

preprocess200.0ms (0.6%)

Memory

-5.1MiB live, 187.0MiB allocated; 16ms collecting garbage

Remove

(abs y-scale)

(abs x-scale)

(abs b)

Compiler

Compiled 18 377 to 8 462 computations (54% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze1.6s (4.4%)

sample4.5s (12.6%)

preprocess50.0ms (0.1%)

series791.0ms (2.2%)

rewrite856.0ms (2.4%)

eval196.0ms (0.5%)

prune125.0ms (0.4%)

series1.9s (5.2%)

rewrite3.1s (8.6%)

eval2.6s (7.3%)

prune1.6s (4.5%)

series1.3s (3.7%)

rewrite2.0s (5.5%)

eval5.2s (14.6%)

prune1.6s (4.5%)

series1.1s (3.1%)

rewrite2.0s (5.6%)

eval2.3s (6.5%)

prune1.1s (3.1%)

regimes1.0s (2.9%)

bsearch184.0ms (0.5%)

bsearch16.0ms (0%)

bsearch36.0ms (0.1%)

bsearch91.0ms (0.3%)

derivations300.0ms (0.8%)

preprocess200.0ms (0.6%)

end0.0ms (0%)

Profiling